home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 July: Mac OS SDK / Dev.CD Jul 99 SDK1.toast / Development Kits / Mac OS / QuickTime / QuickTime 3 Interfaces & Libs / QTDevMac / AIncludes / Sound.a < prev   
Encoding:
Text File  |  1998-08-21  |  75.8 KB  |  2,281 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Sound.a
  3. ;
  4. ;    Contains:    Sound Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    Sound Manager 3.3
  7. ;                Release:    QuickTime 3.0
  8. ;
  9. ;    Copyright:    © 1986-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__SOUND__') = 'UNDEFINED' THEN
  19. __SOUND__ SET 1
  20.  
  21.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  22.     include 'MacTypes.a'
  23.     ENDIF
  24.     IF &TYPE('__DIALOGS__') = 'UNDEFINED' THEN
  25.     include 'Dialogs.a'
  26.     ENDIF
  27.     IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
  28.     include 'Components.a'
  29.     ENDIF
  30.     IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
  31.     include 'MixedMode.a'
  32.     ENDIF
  33.     IF &TYPE('__MOVIES__') = 'UNDEFINED' THEN
  34.     include 'Movies.a'
  35.     ENDIF
  36.  
  37. ; 
  38. ;                        * * *  N O T E  * * *
  39. ;
  40. ;    This file has been updated to include Sound Manager 3.3 interfaces.
  41. ;
  42. ;    Some of the Sound Manager 3.0 interfaces were not put into the InterfaceLib
  43. ;    that originally shipped with the PowerMacs. These missing functions and the
  44. ;    new 3.3 interfaces have been released in the SoundLib library for PowerPC
  45. ;    developers to link with. The runtime library for these functions are
  46. ;    installed by the Sound Manager. The following functions are found in SoundLib.
  47. ;
  48. ;        GetCompressionInfo(), GetSoundPreference(), SetSoundPreference(),
  49. ;        UnsignedFixedMulDiv(), SndGetInfo(), SndSetInfo(), GetSoundOutputInfo(),
  50. ;        SetSoundOutputInfo(), GetCompressionName(), SoundConverterOpen(),
  51. ;        SoundConverterClose(), SoundConverterGetBufferSizes(), SoundConverterBeginConversion(),
  52. ;        SoundConverterConvertBuffer(), SoundConverterEndConversion(),
  53. ;        AudioGetBass(), AudioGetInfo(), AudioGetMute(), AudioGetOutputDevice(),
  54. ;        AudioGetTreble(), AudioGetVolume(), AudioMuteOnEvent(), AudioSetBass(),
  55. ;        AudioSetMute(), AudioSetToDefaults(), AudioSetTreble(), AudioSetVolume(),
  56. ;        OpenMixerSoundComponent(), CloseMixerSoundComponent(), SoundComponentAddSource(),
  57. ;        SoundComponentGetInfo(), SoundComponentGetSource(), SoundComponentGetSourceData(),
  58. ;        SoundComponentInitOutputDevice(), SoundComponentPauseSource(),
  59. ;        SoundComponentPlaySourceBuffer(), SoundComponentRemoveSource(),
  60. ;        SoundComponentSetInfo(), SoundComponentSetOutput(), SoundComponentSetSource(),
  61. ;        SoundComponentStartSource(), SoundComponentStopSource(),
  62. ;        ParseAIFFHeader(), ParseSndHeader(), SoundConverterGetInfo(), SoundConverterSetInfo()
  63. ;
  64.  
  65. ; 
  66. ;    Interfaces for Sound Driver, !!! OBSOLETE and NOT SUPPORTED !!!
  67. ;
  68. ;    These items are no longer defined, but appear here so that someone
  69. ;    searching the interfaces might find them. If you are using one of these
  70. ;    items, you must change your code to support the Sound Manager.
  71. ;
  72. ;        swMode, ftMode, ffMode
  73. ;        FreeWave, FFSynthRec, Tone, SWSynthRec, Wave, FTSoundRec
  74. ;        SndCompletionProcPtr
  75. ;        StartSound, StopSound, SoundDone
  76. ;
  77.  
  78.  
  79. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  80. ;   constants
  81. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  82.  
  83.  
  84.  
  85. soundListRsrc                    EQU        'snd '                ;Resource type used by Sound Manager
  86.  
  87. kSimpleBeepID                    EQU        1                    ;reserved resource ID for Simple Beep
  88.  
  89. rate48khz                        EQU        $BB800000            ;48000.00000 in fixed-point
  90. rate44khz                        EQU        $AC440000            ;44100.00000 in fixed-point
  91. rate22050hz                        EQU        $56220000            ;22050.00000 in fixed-point
  92. rate22khz                        EQU        $56EE8BA3            ;22254.54545 in fixed-point
  93. rate11khz                        EQU        $2B7745D1            ;11127.27273 in fixed-point
  94. rate11025hz                        EQU        $2B110000            ;11025.00000 in fixed-point
  95.  
  96.                                                             ;synthesizer numbers for SndNewChannel
  97. squareWaveSynth                    EQU        1                    ;square wave synthesizer
  98. waveTableSynth                    EQU        3                    ;wave table synthesizer
  99. sampledSynth                    EQU        5                    ;sampled sound synthesizer
  100.                                                             ;old Sound Manager MACE synthesizer numbers
  101. MACE3snthID                        EQU        11
  102. MACE6snthID                        EQU        13
  103.  
  104. kMiddleC                        EQU        60                    ;MIDI note value for middle C
  105.  
  106. kNoVolume                        EQU        0                    ;setting for no sound volume
  107. kFullVolume                        EQU        $0100                ;1.0, setting for full hardware output volume
  108.  
  109. stdQLength                        EQU        128
  110.  
  111. dataOffsetFlag                    EQU        $8000
  112.  
  113. kUseOptionalOutputDevice        EQU        -1                    ;only for Sound Manager 3.0 or later
  114.  
  115. notCompressed                    EQU        0                    ;compression ID's
  116. fixedCompression                EQU        -1                    ;compression ID for fixed-sized compression
  117. variableCompression                EQU        -2                    ;compression ID for variable-sized compression
  118.  
  119. twoToOne                        EQU        1
  120. eightToThree                    EQU        2
  121. threeToOne                        EQU        3
  122. sixToOne                        EQU        4
  123. sixToOnePacketSize                EQU        8
  124. threeToOnePacketSize            EQU        16
  125.  
  126. stateBlockSize                    EQU        64
  127. leftOverBlockSize                EQU        32
  128.  
  129. firstSoundFormat                EQU        $0001                ;general sound format
  130. secondSoundFormat                EQU        $0002                ;special sampled sound format (HyperCard)
  131.  
  132. dbBufferReady                    EQU        $00000001            ;double buffer is filled
  133. dbLastBuffer                    EQU        $00000004            ;last double buffer to play
  134.  
  135. sysBeepDisable                    EQU        $0000                ;SysBeep() enable flags
  136. sysBeepEnable                    EQU        $01
  137. sysBeepSynchronous                EQU        $02                    ;if bit set, make alert sounds synchronous
  138.  
  139. unitTypeNoSelection                EQU        $FFFF                ;unitTypes for AudioSelection.unitType
  140. unitTypeSeconds                    EQU        $0000
  141. ; PPCAsm thinks “extSH” is a directive and therefore can't be a constant (?)
  142. ; But the 68k Asm needs to have these constants, so wrap them inside TARGET_CPU_68K
  143.     IF TARGET_CPU_68K THEN
  144.  
  145. stdSH                            EQU        $00                    ;Standard sound header encode value
  146. extSH                            EQU        $FF                    ;Extended sound header encode value
  147. cmpSH                            EQU        $FE                    ;Compressed sound header encode value
  148.     ENDIF    ; TARGET_CPU_68K
  149. ; command numbers for SndDoCommand and SndDoImmediate
  150.  
  151. nullCmd                            EQU        0
  152. initCmd                            EQU        1
  153. freeCmd                            EQU        2
  154. quietCmd                        EQU        3
  155. flushCmd                        EQU        4
  156. reInitCmd                        EQU        5
  157. waitCmd                            EQU        10
  158. pauseCmd                        EQU        11
  159. resumeCmd                        EQU        12
  160. callBackCmd                        EQU        13
  161. syncCmd                            EQU        14
  162. availableCmd                    EQU        24
  163. versionCmd                        EQU        25
  164. totalLoadCmd                    EQU        26
  165. loadCmd                            EQU        27
  166. freqDurationCmd                    EQU        40
  167. restCmd                            EQU        41
  168. freqCmd                            EQU        42
  169. ampCmd                            EQU        43
  170. timbreCmd                        EQU        44
  171. getAmpCmd                        EQU        45
  172. volumeCmd                        EQU        46                    ;sound manager 3.0 or later only
  173. getVolumeCmd                    EQU        47                    ;sound manager 3.0 or later only
  174. clockComponentCmd                EQU        50                    ;sound manager 3.2.1 or later only
  175. getClockComponentCmd            EQU        51                    ;sound manager 3.2.1 or later only
  176. scheduledSoundCmd                EQU        52                    ;sound manager 3.3 or later only
  177. linkSoundComponentsCmd            EQU        53                    ;sound manager 3.3 or later only
  178. waveTableCmd                    EQU        60
  179. phaseCmd                        EQU        61
  180. soundCmd                        EQU        80
  181. bufferCmd                        EQU        81
  182. rateCmd                            EQU        82
  183. continueCmd                        EQU        83
  184. doubleBufferCmd                    EQU        84
  185. getRateCmd                        EQU        85
  186. rateMultiplierCmd                EQU        86
  187. getRateMultiplierCmd            EQU        87
  188. sizeCmd                            EQU        90                    ;obsolete command
  189. convertCmd                        EQU        91                    ;obsolete MACE command
  190.     IF OLDROUTINENAMES THEN
  191. ; channel initialization parameters
  192.  
  193. waveInitChannelMask                EQU        $07
  194. waveInitChannel0                EQU        $04                    ;wave table only, Sound Manager 2.0 and earlier
  195. waveInitChannel1                EQU        $05                    ;wave table only, Sound Manager 2.0 and earlier
  196. waveInitChannel2                EQU        $06                    ;wave table only, Sound Manager 2.0 and earlier
  197. waveInitChannel3                EQU        $07                    ;wave table only, Sound Manager 2.0 and earlier
  198. initChan0                        EQU        $04                    ;obsolete spelling
  199. initChan1                        EQU        $05                    ;obsolete spelling
  200. initChan2                        EQU        $06                    ;obsolete spelling
  201. initChan3                        EQU        $07                    ;obsolete spelling
  202.  
  203. outsideCmpSH                    EQU        0                    ;obsolete MACE constant
  204. insideCmpSH                        EQU        1                    ;obsolete MACE constant
  205. aceSuccess                        EQU        0                    ;obsolete MACE constant
  206. aceMemFull                        EQU        1                    ;obsolete MACE constant
  207. aceNilBlock                        EQU        2                    ;obsolete MACE constant
  208. aceBadComp                        EQU        3                    ;obsolete MACE constant
  209. aceBadEncode                    EQU        4                    ;obsolete MACE constant
  210. aceBadDest                        EQU        5                    ;obsolete MACE constant
  211. aceBadCmd                        EQU        6                    ;obsolete MACE constant
  212.     ENDIF    ; OLDROUTINENAMES
  213.  
  214. initChanLeft                    EQU        $0002                ;left stereo channel
  215. initChanRight                    EQU        $0003                ;right stereo channel
  216. initNoInterp                    EQU        $0004                ;no linear interpolation
  217. initNoDrop                        EQU        $0008                ;no drop-sample conversion
  218. initMono                        EQU        $0080                ;monophonic channel
  219. initStereo                        EQU        $00C0                ;stereo channel
  220. initMACE3                        EQU        $0300                ;MACE 3:1
  221. initMACE6                        EQU        $0400                ;MACE 6:1
  222. initPanMask                        EQU        $0003                ;mask for right/left pan values
  223. initSRateMask                    EQU        $0030                ;mask for sample rate values
  224. initStereoMask                    EQU        $00C0                ;mask for mono/stereo values
  225. initCompMask                    EQU        $FF00                ;mask for compression IDs
  226. ; Get&Set Sound Information Selectors
  227.  
  228. siActiveChannels                EQU        'chac'                ;active channels
  229. siActiveLevels                    EQU        'lmac'                ;active meter levels
  230. siAGCOnOff                        EQU        'agc '                ;automatic gain control state
  231. siAsync                            EQU        'asyn'                ;asynchronous capability
  232. siAVDisplayBehavior                EQU        'avdb'
  233. siChannelAvailable                EQU        'chav'                ;number of channels available
  234. siCompressionAvailable            EQU        'cmav'                ;compression types available
  235. siCompressionChannels            EQU        'cpct'                ;compressor's number of channels
  236. siCompressionFactor                EQU        'cmfa'                ;current compression factor
  237. siCompressionHeader                EQU        'cmhd'                ;return compression header
  238. siCompressionNames                EQU        'cnam'                ;compression type names available
  239. siCompressionParams                EQU        'evaw'                ;compression parameters
  240. siCompressionSampleRate            EQU        'cprt'                ;compressor's sample rate
  241. siCompressionType                EQU        'comp'                ;current compression type
  242. siContinuous                    EQU        'cont'                ;continous recording
  243. siDecompressionParams            EQU        'wave'                ;decompression parameters
  244. siDeviceBufferInfo                EQU        'dbin'                ;size of interrupt buffer
  245. siDeviceConnected                EQU        'dcon'                ;input device connection status
  246. siDeviceIcon                    EQU        'icon'                ;input device icon
  247. siDeviceName                    EQU        'name'                ;input device name
  248. siHardwareBalance                EQU        'hbal'
  249. siHardwareBalanceSteps            EQU        'hbls'
  250. siHardwareBass                    EQU        'hbas'
  251. siHardwareBassSteps                EQU        'hbst'
  252. siHardwareBusy                    EQU        'hwbs'                ;sound hardware is in use
  253. siHardwareFormat                EQU        'hwfm'                ;get hardware format
  254. siHardwareMute                    EQU        'hmut'                ;mute state of all hardware
  255. siHardwareTreble                EQU        'htrb'
  256. siHardwareTrebleSteps            EQU        'hwts'
  257. siHardwareVolume                EQU        'hvol'                ;volume level of all hardware
  258. siHardwareVolumeSteps            EQU        'hstp'                ;number of volume steps for hardware
  259. siHeadphoneMute                    EQU        'pmut'                ;mute state of headphones
  260. siHeadphoneVolume                EQU        'pvol'                ;volume level of headphones
  261. siHeadphoneVolumeSteps            EQU        'hdst'                ;number of volume steps for headphones
  262. siInputAvailable                EQU        'inav'                ;input sources available
  263. siInputGain                        EQU        'gain'                ;input gain
  264. siInputSource                    EQU        'sour'                ;input source selector
  265. siInputSourceNames                EQU        'snam'                ;input source names
  266. siLevelMeterOnOff                EQU        'lmet'                ;level meter state
  267. siModemGain                        EQU        'mgai'                ;modem input gain
  268. siMonitorAvailable                EQU        'mnav'
  269. siMonitorSource                    EQU        'mons'
  270. siNumberChannels                EQU        'chan'                ;current number of channels
  271. siOptionsDialog                    EQU        'optd'                ;display options dialog
  272. siOSTypeInputSource                EQU        'inpt'                ;input source by OSType
  273. siOSTypeInputAvailable            EQU        'inav'                ;list of available input source OSTypes
  274. siPlayThruOnOff                    EQU        'plth'                ;playthrough state
  275. siPostMixerSoundComponent        EQU        'psmx'                ;install post-mixer effect
  276. siPreMixerSoundComponent        EQU        'prmx'                ;install pre-mixer effect
  277. siQuality                        EQU        'qual'                ;quality setting
  278. siRateMultiplier                EQU        'rmul'                ;throttle rate setting
  279. siRecordingQuality                EQU        'qual'                ;recording quality
  280. siSampleRate                    EQU        'srat'                ;current sample rate
  281. siSampleRateAvailable            EQU        'srav'                ;sample rates available
  282. siSampleSize                    EQU        'ssiz'                ;current sample size
  283. siSampleSizeAvailable            EQU        'ssav'                ;sample sizes available
  284. siSetupCDAudio                    EQU        'sucd'                ;setup sound hardware for CD audio
  285. siSetupModemAudio                EQU        'sumd'                ;setup sound hardware for modem audio
  286. siSlopeAndIntercept                EQU        'flap'                ;floating point variables for conversion
  287. siSoundClock                    EQU        'sclk'
  288. siUseThisSoundClock                EQU        'sclc'                ;sdev uses this to tell the mixer to use his sound clock
  289. siSpeakerMute                    EQU        'smut'                ;mute state of all built-in speaker
  290. siSpeakerVolume                    EQU        'svol'                ;volume level of built-in speaker
  291. siSSpCPULoadLimit                EQU        '3dll'
  292. siSSpLocalization                EQU        '3dif'
  293. siSSpSpeakerSetup                EQU        '3dst'
  294. siStereoInputGain                EQU        'sgai'                ;stereo input gain
  295. siSubwooferMute                    EQU        'bmut'                ;mute state of sub-woofer
  296. siTwosComplementOnOff            EQU        'twos'                ;two's complement state
  297. siVolume                        EQU        'volu'                ;volume level of source
  298. siVoxRecordInfo                    EQU        'voxr'                ;VOX record parameters
  299. siVoxStopInfo                    EQU        'voxs'                ;VOX stop parameters
  300. siWideStereo                    EQU        'wide'                ;wide stereo setting
  301.  
  302. siCloseDriver                    EQU        'clos'                ;reserved for internal use only
  303. siInitializeDriver                EQU        'init'                ;reserved for internal use only
  304. siPauseRecording                EQU        'paus'                ;reserved for internal use only
  305. siUserInterruptProc                EQU        'user'                ;reserved for internal use only
  306. ;  input source Types
  307.  
  308. kInvalidSource                    EQU        $FFFFFFFF            ;this source may be returned from GetInfo if no other source is the monitored source
  309. kNoSource                        EQU        'none'                ;no source selection
  310. kCDSource                        EQU        'cd  '                ;internal CD player input
  311. kExtMicSource                    EQU        'emic'                ;external mic input
  312. kRCAInSource                    EQU        'irca'                ;RCA jack input
  313. kTVFMTunerSource                EQU        'tvfm'
  314. kDAVInSource                    EQU        'idav'                ;DAV analog input
  315. kIntMicSource                    EQU        'imic'                ;internal mic input
  316. kMediaBaySource                    EQU        'mbay'                ;media bay input
  317. kModemSource                    EQU        'modm'                ;modem input (internal modem on desktops, PCI input on PowerBooks)
  318. kPCCardSource                    EQU        'pcm '                ;PC Card pwm input
  319. kZoomVideoSource                EQU        'zvpc'                ;zoom video input
  320. kDVDSource                        EQU        'dvda'                ;DVD audio input
  321. ; Sound Component Types and Subtypes
  322.  
  323. kNoSoundComponentType            EQU        '****'
  324. kSoundComponentType                EQU        'sift'                ;component type
  325. kSoundComponentPPCType            EQU        'nift'                ;component type for PowerPC code
  326. kRate8SubType                    EQU        'ratb'                ;8-bit rate converter
  327. kRate16SubType                    EQU        'ratw'                ;16-bit rate converter
  328. kConverterSubType                EQU        'conv'                ;sample format converter
  329. kSndSourceSubType                EQU        'sour'                ;generic source component
  330. kMixerType                        EQU        'mixr'
  331. kMixer8SubType                    EQU        'mixb'                ;8-bit mixer
  332. kMixer16SubType                    EQU        'mixw'                ;16-bit mixer
  333. kSoundInputDeviceType            EQU        'sinp'                ;sound input component
  334. kWaveInSubType                    EQU        'wavi'                ;Windows Wave
  335. kSoundOutputDeviceType            EQU        'sdev'                ;sound output component
  336. kClassicSubType                    EQU        'clas'                ;classic hardware, i.e. Mac Plus
  337. kASCSubType                        EQU        'asc '                ;Apple Sound Chip device
  338. kDSPSubType                        EQU        'dsp '                ;DSP device
  339. kAwacsSubType                    EQU        'awac'                ;Another of Will's Audio Chips device
  340. kGCAwacsSubType                    EQU        'awgc'                ;Awacs audio with Grand Central DMA
  341. kSingerSubType                    EQU        'sing'                ;Singer (via Whitney) based sound
  342. kSinger2SubType                    EQU        'sng2'                ;Singer 2 (via Whitney) for Acme
  343. kWhitSubType                    EQU        'whit'                ;Whit sound component for PrimeTime 3
  344. kSoundBlasterSubType            EQU        'sbls'                ;Sound Blaster for CHRP
  345. kWaveOutSubType                    EQU        'wavo'                ;Windows Wave
  346. kDirectSoundSubType                EQU        'dsnd'                ;Direct Sound
  347. kUNIXsdevSubType                EQU        'un1x'                ;UNIX base sdev
  348. kSoundCompressor                EQU        'scom'
  349. kSoundDecompressor                EQU        'sdec'
  350. kAudioComponentType                EQU        'adio'                ;Audio components and sub-types
  351. kAwacsPhoneSubType                EQU        'hphn'
  352. kAudioVisionSpeakerSubType        EQU        'telc'
  353. kAudioVisionHeadphoneSubType    EQU        'telh'
  354. kPhilipsFaderSubType            EQU        'tvav'
  355. kSGSToneSubType                    EQU        'sgs0'
  356. kSoundEffectsType                EQU        'snfx'                ;sound effects type
  357. kSSpLocalizationSubType            EQU        'snd3'
  358. kSoundPortHandlerType            EQU        'soph'                ;sound output port handler component
  359. kAwacsGCSubType                    EQU        'awgc'                ;awacs GC port handler
  360. kSoundOutPortType                EQU        'sopt'                ;sound output port component
  361. kIntSpkrSubType                    EQU        'ispk'                ;internal speaker
  362. kHeadphonesSubType                EQU        'hdpn'                ;headphones
  363. kExtSpkrSubType                    EQU        'espk'                ;external speaker
  364. kEffectSubType                    EQU        'efct'                ;effect (like SRS or some other DSP function)
  365. kSubwooferSubType                EQU        'subw'                ;subwoofer
  366. kSoundPowerType                    EQU        'spwr'                ;sound power component
  367. kPowerAwacsSubType                EQU        'awac'                ;awacs power
  368. kPowerScreamerSubType            EQU        'scrm'                ;screamer power
  369. ; Format Types
  370.  
  371. kSoundNotCompressed                EQU        'NONE'                ;sound is not compressed
  372. k8BitOffsetBinaryFormat            EQU        'raw '                ;8-bit offset binary
  373. k16BitBigEndianFormat            EQU        'twos'                ;16-bit big endian
  374. k16BitLittleEndianFormat        EQU        'sowt'                ;16-bit little endian
  375. kFloat32Format                    EQU        'fl32'                ;32-bit floating point
  376. kFloat64Format                    EQU        'fl64'                ;64-bit floating point
  377. k24BitFormat                    EQU        'in24'                ;24-bit integer
  378. k32BitFormat                    EQU        'in32'                ;32-bit integer
  379. kMACE3Compression                EQU        'MAC3'                ;MACE 3:1
  380. kMACE6Compression                EQU        'MAC6'                ;MACE 6:1
  381. kCDXA4Compression                EQU        'cdx4'                ;CD/XA 4:1
  382. kCDXA2Compression                EQU        'cdx2'                ;CD/XA 2:1
  383. kIMACompression                    EQU        'ima4'                ;IMA 4:1
  384. kULawCompression                EQU        'ulaw'                ;µLaw 2:1
  385. kALawCompression                EQU        'alaw'                ;aLaw 2:1
  386. kMicrosoftADPCMFormat            EQU        $6D730002            ;Microsoft ADPCM - ACM code 2
  387. kDVIIntelIMAFormat                EQU        $6D730011            ;DVI/Intel IMA ADPCM - ACM code 17
  388. kDVAudioFormat                    EQU        'dvca'                ;DV Audio
  389. kQDesignCompression                EQU        'QDMC'                ;QDesign music
  390. kQUALCOMMCompression            EQU        'Qclp'                ;QUALCOMM PureVoice
  391. kOffsetBinary                    EQU        'raw '                ;for compatibility
  392. kTwosComplement                    EQU        'twos'                ;for compatibility
  393. kLittleEndianFormat                EQU        'sowt'                ;for compatibility
  394.     IF TARGET_RT_LITTLE_ENDIAN THEN
  395.  
  396. k16BitNativeEndianFormat        EQU        'sowt'
  397. k16BitNonNativeEndianFormat        EQU        'twos'
  398.     ELSE
  399.  
  400. k16BitNativeEndianFormat        EQU        'twos'
  401. k16BitNonNativeEndianFormat        EQU        'sowt'
  402.     ENDIF    ; TARGET_RT_LITTLE_ENDIAN
  403. ; Features Flags
  404.  
  405. k8BitRawIn                        EQU        $01                    ;data description
  406. k8BitTwosIn                        EQU        $02
  407. k16BitIn                        EQU        $04
  408. kStereoIn                        EQU        $08
  409. k8BitRawOut                        EQU        $0100
  410. k8BitTwosOut                    EQU        $0200
  411. k16BitOut                        EQU        $0400
  412. kStereoOut                        EQU        $0800
  413. kReverse                        EQU        $00010000            ;  function description
  414. kRateConvert                    EQU        $00020000
  415. kCreateSoundSource                EQU        $00040000
  416. kHighQuality                    EQU        $00400000            ;  performance description
  417. kNonRealTime                    EQU        $00800000
  418. ; SoundComponentPlaySourceBuffer action flags
  419.  
  420. kSourcePaused                    EQU        $01
  421. kPassThrough                    EQU        $00010000
  422. kNoSoundComponentChain            EQU        $00020000
  423. ; SoundParamBlock flags, usefull for OpenMixerSoundComponent
  424.  
  425. kNoMixing                        EQU        $01                    ;don't mix source
  426. kNoSampleRateConversion            EQU        $02                    ;don't convert sample rate (i.e. 11 kHz -> 22 kHz)
  427. kNoSampleSizeConversion            EQU        $04                    ;don't convert sample size (i.e. 16 -> 8)
  428. kNoSampleFormatConversion        EQU        $08                    ;don't convert sample format (i.e. 'twos' -> 'raw ')
  429. kNoChannelConversion            EQU        $10                    ;don't convert stereo/mono
  430. kNoDecompression                EQU        $20                    ;don't decompress (i.e. 'MAC3' -> 'raw ')
  431. kNoVolumeConversion                EQU        $40                    ;don't apply volume
  432. kNoRealtimeProcessing            EQU        $80                    ;won't run at interrupt time
  433. kScheduledSource                EQU        $0100                ;source is scheduled
  434. ; SoundParamBlock quality settings
  435.  
  436. kBestQuality                    EQU        $01                    ;use interpolation in rate conversion
  437. ; useful bit masks
  438.  
  439. kInputMask                        EQU        $000000FF            ;masks off input bits
  440. kOutputMask                        EQU        $0000FF00            ;masks off output bits
  441. kOutputShift                    EQU        8                    ;amount output bits are shifted
  442. kActionMask                        EQU        $00FF0000            ;masks off action bits
  443. kSoundComponentBits                EQU        $00FFFFFF
  444. ; audio atom types
  445.  
  446. kAudioFormatAtomType            EQU        'frma'
  447. kAudioEndianAtomType            EQU        'enda'
  448. kAudioTerminatorAtomType        EQU        0
  449. ; siAVDisplayBehavior types
  450.  
  451. kAVDisplayHeadphoneRemove        EQU        0                    ; monitor does not have a headphone attached
  452. kAVDisplayHeadphoneInsert        EQU        1                    ; monitor has a headphone attached
  453. kAVDisplayPlainTalkRemove        EQU        2                    ; monitor either sending no input through CPU input port or unable to tell if input is coming in
  454. kAVDisplayPlainTalkInsert        EQU        3                    ; monitor sending PlainTalk level microphone source input through sound input port
  455. ; Audio Component constants
  456.  
  457.                                                             ;Values for whichChannel parameter
  458. audioAllChannels                EQU        0                    ;All channels (usually interpreted as both left and right)
  459. audioLeftChannel                EQU        1                    ;Left channel
  460. audioRightChannel                EQU        2                    ;Right channel
  461.                                                             ;Values for mute parameter
  462. audioUnmuted                    EQU        0                    ;Device is unmuted
  463. audioMuted                        EQU        1                    ;Device is muted
  464.                                                             ;Capabilities flags definitions
  465. audioDoesMono                    EQU        $00000001            ;Device supports mono output
  466. audioDoesStereo                    EQU        $00000002            ;Device supports stereo output
  467. audioDoesIndependentChannels    EQU        $00000004            ;Device supports independent software control of each channel
  468. ; Sound Input Qualities
  469.  
  470. siCDQuality                        EQU        'cd  '                ;44.1kHz, stereo, 16 bit
  471. siBestQuality                    EQU        'best'                ;22kHz, mono, 8 bit
  472. siBetterQuality                    EQU        'betr'                ;22kHz, mono, MACE 3:1
  473. siGoodQuality                    EQU        'good'                ;22kHz, mono, MACE 6:1
  474. siNoneQuality                    EQU        'none'                ;settings don't match any quality for a get call
  475.  
  476. siDeviceIsConnected                EQU        1                    ;input device is connected and ready for input
  477. siDeviceNotConnected            EQU        0                    ;input device is not connected
  478. siDontKnowIfConnected            EQU        -1                    ;can't tell if input device is connected
  479. siReadPermission                EQU        0                    ;permission passed to SPBOpenDevice
  480. siWritePermission                EQU        1                    ;permission passed to SPBOpenDevice
  481.  
  482. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  483. ;   typedefs
  484. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  485.  
  486.  
  487.  
  488. SndCommand                RECORD 0
  489. cmd                         ds.w    1                ; offset: $0 (0)
  490. param1                     ds.w    1                ; offset: $2 (2)
  491. param2                     ds.l    1                ; offset: $4 (4)
  492. sizeof                     EQU *                    ; size:   $8 (8)
  493.                         ENDR
  494.  
  495.  
  496. ; typedef SndChannel *                    SndChannelPtr
  497.  
  498. SndChannel                RECORD 0
  499. nextChan                 ds.l    1                ; offset: $0 (0)
  500. firstMod                 ds.l    1                ; offset: $4 (4)        ;  reserved for the Sound Manager 
  501. callBack                 ds.l    1                ; offset: $8 (8)
  502. userInfo                 ds.l    1                ; offset: $C (12)
  503. wait                     ds.l    1                ; offset: $10 (16)        ;  The following is for internal Sound Manager use only.
  504. cmdInProgress             ds        SndCommand        ; offset: $14 (20)
  505. flags                     ds.w    1                ; offset: $1C (28)
  506. qLength                     ds.w    1                ; offset: $1E (30)
  507. qHead                     ds.w    1                ; offset: $20 (32)
  508. qTail                     ds.w    1                ; offset: $22 (34)
  509. queue                     ds.b    128 * SndCommand.sizeof ; offset: $24 (36)
  510. sizeof                     EQU *                    ; size:   $424 (1060)
  511.                         ENDR
  512. ; MACE structures
  513. StateBlock                RECORD 0
  514. stateVar                 ds.w    64                ; offset: $0 (0)
  515. sizeof                     EQU *                    ; size:   $80 (128)
  516.                         ENDR
  517. ; typedef struct StateBlock *            StateBlockPtr
  518.  
  519. LeftOverBlock            RECORD 0
  520. count                     ds.l    1                ; offset: $0 (0)
  521. sampleArea                 ds.b    32                ; offset: $4 (4)
  522. sizeof                     EQU *                    ; size:   $24 (36)
  523.                         ENDR
  524. ; typedef struct LeftOverBlock *        LeftOverBlockPtr
  525.  
  526. ModRef                    RECORD 0
  527. modNumber                 ds.w    1                ; offset: $0 (0)
  528. modInit                     ds.l    1                ; offset: $2 (2)
  529. sizeof                     EQU *                    ; size:   $6 (6)
  530.                         ENDR
  531. SndListResource            RECORD 0
  532. format                     ds.w    1                ; offset: $0 (0)
  533. numModifiers             ds.w    1                ; offset: $2 (2)
  534. modifierPart             ds        ModRef            ; offset: $4 (4) <-- really an array of length one
  535. numCommands                 ds.w    1                ; offset: $A (10)
  536. commandPart                 ds        SndCommand        ; offset: $C (12) <-- really an array of length one
  537. dataPart                 ds.b    1                ; offset: $14 (20) <-- really an array of length one
  538.                          ORG 22
  539. sizeof                     EQU *                    ; size:   $16 (22)
  540.                         ENDR
  541. ; typedef struct SndListResource *        SndListPtr
  542.  
  543. ; typedef SndListPtr *                    SndListHandle
  544.  
  545. ; typedef SndListHandle                 SndListHndl
  546.  
  547. ; HyperCard sound resource format
  548. Snd2ListResource        RECORD 0
  549. format                     ds.w    1                ; offset: $0 (0)
  550. refCount                 ds.w    1                ; offset: $2 (2)
  551. numCommands                 ds.w    1                ; offset: $4 (4)
  552. commandPart                 ds        SndCommand        ; offset: $6 (6) <-- really an array of length one
  553. dataPart                 ds.b    1                ; offset: $E (14) <-- really an array of length one
  554.                          ORG 16
  555. sizeof                     EQU *                    ; size:   $10 (16)
  556.                         ENDR
  557. ; typedef struct Snd2ListResource *        Snd2ListPtr
  558.  
  559. ; typedef Snd2ListPtr *                    Snd2ListHandle
  560.  
  561. ; typedef Snd2ListHandle                 Snd2ListHndl
  562.  
  563. SoundHeader                RECORD 0
  564. samplePtr                 ds.l    1                ; offset: $0 (0)        ; if NIL then samples are in sampleArea
  565. length                     ds.l    1                ; offset: $4 (4)        ; length of sound in bytes
  566. sampleRate                 ds.l    1                ; offset: $8 (8)        ; sample rate for this sound
  567. loopStart                 ds.l    1                ; offset: $C (12)        ; start of looping portion
  568. loopEnd                     ds.l    1                ; offset: $10 (16)        ; end of looping portion
  569. encode                     ds.b    1                ; offset: $14 (20)        ; header encoding
  570. baseFrequency             ds.b    1                ; offset: $15 (21)        ; baseFrequency value
  571. sampleArea                 ds.b    1                ; offset: $16 (22) <-- really an array of length one ; space for when samples follow directly
  572.                          ORG 24
  573. sizeof                     EQU *                    ; size:   $18 (24)
  574.                         ENDR
  575. ; typedef struct SoundHeader *            SoundHeaderPtr
  576.  
  577. CmpSoundHeader            RECORD 0
  578. samplePtr                 ds.l    1                ; offset: $0 (0)        ; if nil then samples are in sample area
  579. numChannels                 ds.l    1                ; offset: $4 (4)        ; number of channels i.e. mono = 1
  580. sampleRate                 ds.l    1                ; offset: $8 (8)        ; sample rate in Apples Fixed point representation
  581. loopStart                 ds.l    1                ; offset: $C (12)        ; loopStart of sound before compression
  582. loopEnd                     ds.l    1                ; offset: $10 (16)        ; loopEnd of sound before compression
  583. encode                     ds.b    1                ; offset: $14 (20)        ; data structure used , stdSH, extSH, or cmpSH
  584. baseFrequency             ds.b    1                ; offset: $15 (21)        ; same meaning as regular SoundHeader
  585. numFrames                 ds.l    1                ; offset: $16 (22)        ; length in frames ( packetFrames or sampleFrames )
  586. AIFFSampleRate             ds        extended80        ; offset: $1A (26)        ; IEEE sample rate
  587. markerChunk                 ds.l    1                ; offset: $24 (36)        ; sync track
  588. format                     ds.l    1                ; offset: $28 (40)        ; data format type, was futureUse1
  589. futureUse2                 ds.l    1                ; offset: $2C (44)        ; reserved by Apple
  590. stateVars                 ds.l    1                ; offset: $30 (48)        ; pointer to State Block
  591. leftOverSamples             ds.l    1                ; offset: $34 (52)        ; used to save truncated samples between compression calls
  592. compressionID             ds.w    1                ; offset: $38 (56)        ; 0 means no compression, non zero means compressionID
  593. packetSize                 ds.w    1                ; offset: $3A (58)        ; number of bits in compressed sample packet
  594. snthID                     ds.w    1                ; offset: $3C (60)        ; resource ID of Sound Manager snth that contains NRT C/E
  595. sampleSize                 ds.w    1                ; offset: $3E (62)        ; number of bits in non-compressed sample
  596. sampleArea                 ds.b    1                ; offset: $40 (64) <-- really an array of length one ; space for when samples follow directly
  597.                          ORG 66
  598. sizeof                     EQU *                    ; size:   $42 (66)
  599.                         ENDR
  600. ; typedef struct CmpSoundHeader *        CmpSoundHeaderPtr
  601.  
  602. ExtSoundHeader            RECORD 0
  603. samplePtr                 ds.l    1                ; offset: $0 (0)        ; if nil then samples are in sample area
  604. numChannels                 ds.l    1                ; offset: $4 (4)        ; number of channels,  ie mono = 1
  605. sampleRate                 ds.l    1                ; offset: $8 (8)        ; sample rate in Apples Fixed point representation
  606. loopStart                 ds.l    1                ; offset: $C (12)        ; same meaning as regular SoundHeader
  607. loopEnd                     ds.l    1                ; offset: $10 (16)        ; same meaning as regular SoundHeader
  608. encode                     ds.b    1                ; offset: $14 (20)        ; data structure used , stdSH, extSH, or cmpSH
  609. baseFrequency             ds.b    1                ; offset: $15 (21)        ; same meaning as regular SoundHeader
  610. numFrames                 ds.l    1                ; offset: $16 (22)        ; length in total number of frames
  611. AIFFSampleRate             ds        extended80        ; offset: $1A (26)        ; IEEE sample rate
  612. markerChunk                 ds.l    1                ; offset: $24 (36)        ; sync track
  613. instrumentChunks         ds.l    1                ; offset: $28 (40)        ; AIFF instrument chunks
  614. AESRecording             ds.l    1                ; offset: $2C (44)
  615. sampleSize                 ds.w    1                ; offset: $30 (48)        ; number of bits in sample
  616. futureUse1                 ds.w    1                ; offset: $32 (50)        ; reserved by Apple
  617. futureUse2                 ds.l    1                ; offset: $34 (52)        ; reserved by Apple
  618. futureUse3                 ds.l    1                ; offset: $38 (56)        ; reserved by Apple
  619. futureUse4                 ds.l    1                ; offset: $3C (60)        ; reserved by Apple
  620. sampleArea                 ds.b    1                ; offset: $40 (64) <-- really an array of length one ; space for when samples follow directly
  621.                          ORG 66
  622. sizeof                     EQU *                    ; size:   $42 (66)
  623.                         ENDR
  624. ; typedef struct ExtSoundHeader *        ExtSoundHeaderPtr
  625.  
  626. SoundHeaderUnion        RECORD 0
  627. stdHeader                 ds        SoundHeader        ; offset: $0 (0)
  628.                          ORG 0
  629. cmpHeader                 ds        CmpSoundHeader ; offset: $0 (0)
  630.                          ORG 0
  631. extHeader                 ds        ExtSoundHeader ; offset: $0 (0)
  632. sizeof                     EQU *                    ; size:   $42 (66)
  633.                         ENDR
  634. ConversionBlock            RECORD 0
  635. destination                 ds.w    1                ; offset: $0 (0)
  636. unused                     ds.w    1                ; offset: $2 (2)
  637. inputPtr                 ds.l    1                ; offset: $4 (4)
  638. outputPtr                 ds.l    1                ; offset: $8 (8)
  639. sizeof                     EQU *                    ; size:   $C (12)
  640.                         ENDR
  641. ; typedef struct ConversionBlock *        ConversionBlockPtr
  642.  
  643. ;  ScheduledSoundHeader flags
  644.  
  645. kScheduledSoundDoScheduled        EQU        $01
  646. kScheduledSoundDoCallBack        EQU        $02
  647. ScheduledSoundHeader    RECORD 0
  648. u                         ds        SoundHeaderUnion ; offset: $0 (0)
  649. flags                     ds.l    1                ; offset: $42 (66)
  650. reserved                 ds.w    1                ; offset: $46 (70)
  651. callBackParam1             ds.w    1                ; offset: $48 (72)
  652. callBackParam2             ds.l    1                ; offset: $4A (74)
  653. startTime                 ds        TimeRecord        ; offset: $4E (78)
  654. sizeof                     EQU *                    ; size:   $5E (94)
  655.                         ENDR
  656. ; typedef struct ScheduledSoundHeader *    ScheduledSoundHeaderPtr
  657.  
  658. SMStatus                RECORD 0
  659. smMaxCPULoad             ds.w    1                ; offset: $0 (0)
  660. smNumChannels             ds.w    1                ; offset: $2 (2)
  661. smCurCPULoad             ds.w    1                ; offset: $4 (4)
  662. sizeof                     EQU *                    ; size:   $6 (6)
  663.                         ENDR
  664. ; typedef struct SMStatus *                SMStatusPtr
  665.  
  666. SCStatus                RECORD 0
  667. scStartTime                 ds.l    1                ; offset: $0 (0)
  668. scEndTime                 ds.l    1                ; offset: $4 (4)
  669. scCurrentTime             ds.l    1                ; offset: $8 (8)
  670. scChannelBusy             ds.b    1                ; offset: $C (12)
  671. scChannelDisposed         ds.b    1                ; offset: $D (13)
  672. scChannelPaused             ds.b    1                ; offset: $E (14)
  673. scUnused                 ds.b    1                ; offset: $F (15)
  674. scChannelAttributes         ds.l    1                ; offset: $10 (16)
  675. scCPULoad                 ds.l    1                ; offset: $14 (20)
  676. sizeof                     EQU *                    ; size:   $18 (24)
  677.                         ENDR
  678. ; typedef struct SCStatus *                SCStatusPtr
  679.  
  680. AudioSelection            RECORD 0
  681. unitType                 ds.l    1                ; offset: $0 (0)
  682. selStart                 ds.l    1                ; offset: $4 (4)
  683. selEnd                     ds.l    1                ; offset: $8 (8)
  684. sizeof                     EQU *                    ; size:   $C (12)
  685.                         ENDR
  686. ; typedef struct AudioSelection *        AudioSelectionPtr
  687.  
  688. SndDoubleBuffer            RECORD 0
  689. dbNumFrames                 ds.l    1                ; offset: $0 (0)
  690. dbFlags                     ds.l    1                ; offset: $4 (4)
  691. dbUserInfo                 ds.l    2                ; offset: $8 (8)
  692. dbSoundData                 ds.b    1                ; offset: $10 (16) <-- really an array of length one
  693.                          ORG 18
  694. sizeof                     EQU *                    ; size:   $12 (18)
  695.                         ENDR
  696. ; typedef struct SndDoubleBuffer *        SndDoubleBufferPtr
  697.  
  698. SndDoubleBufferHeader    RECORD 0
  699. dbhNumChannels             ds.w    1                ; offset: $0 (0)
  700. dbhSampleSize             ds.w    1                ; offset: $2 (2)
  701. dbhCompressionID         ds.w    1                ; offset: $4 (4)
  702. dbhPacketSize             ds.w    1                ; offset: $6 (6)
  703. dbhSampleRate             ds.l    1                ; offset: $8 (8)
  704. dbhBufferPtr             ds.l    2                ; offset: $C (12)
  705. dbhDoubleBack             ds.l    1                ; offset: $14 (20)
  706. sizeof                     EQU *                    ; size:   $18 (24)
  707.                         ENDR
  708. ; typedef struct SndDoubleBufferHeader * SndDoubleBufferHeaderPtr
  709.  
  710. SndDoubleBufferHeader2    RECORD 0
  711. dbhNumChannels             ds.w    1                ; offset: $0 (0)
  712. dbhSampleSize             ds.w    1                ; offset: $2 (2)
  713. dbhCompressionID         ds.w    1                ; offset: $4 (4)
  714. dbhPacketSize             ds.w    1                ; offset: $6 (6)
  715. dbhSampleRate             ds.l    1                ; offset: $8 (8)
  716. dbhBufferPtr             ds.l    2                ; offset: $C (12)
  717. dbhDoubleBack             ds.l    1                ; offset: $14 (20)
  718. dbhFormat                 ds.l    1                ; offset: $18 (24)
  719. sizeof                     EQU *                    ; size:   $1C (28)
  720.                         ENDR
  721. ; typedef struct SndDoubleBufferHeader2 * SndDoubleBufferHeader2Ptr
  722.  
  723. SoundInfoList            RECORD 0
  724. count                     ds.w    1                ; offset: $0 (0)
  725. infoHandle                 ds.l    1                ; offset: $2 (2)
  726. sizeof                     EQU *                    ; size:   $6 (6)
  727.                         ENDR
  728. ; typedef struct SoundInfoList *        SoundInfoListPtr
  729.  
  730. SoundComponentData        RECORD 0
  731. flags                     ds.l    1                ; offset: $0 (0)
  732. format                     ds.l    1                ; offset: $4 (4)
  733. numChannels                 ds.w    1                ; offset: $8 (8)
  734. sampleSize                 ds.w    1                ; offset: $A (10)
  735. sampleRate                 ds.l    1                ; offset: $C (12)
  736. sampleCount                 ds.l    1                ; offset: $10 (16)
  737. buffer                     ds.l    1                ; offset: $14 (20)
  738. reserved                 ds.l    1                ; offset: $18 (24)
  739. sizeof                     EQU *                    ; size:   $1C (28)
  740.                         ENDR
  741. ; typedef struct SoundComponentData *    SoundComponentDataPtr
  742.  
  743.  
  744.  
  745. ; typedef SoundParamBlock *                SoundParamBlockPtr
  746.  
  747. SoundParamBlock            RECORD 0
  748. recordSize                 ds.l    1                ; offset: $0 (0)        ; size of this record in bytes
  749. desc                     ds        SoundComponentData ; offset: $4 (4)        ; description of sound buffer
  750. rateMultiplier             ds.l    1                ; offset: $20 (32)        ; rate multiplier to apply to sound
  751. leftVolume                 ds.w    1                ; offset: $24 (36)        ; volumes to apply to sound
  752. rightVolume                 ds.w    1                ; offset: $26 (38)
  753. quality                     ds.l    1                ; offset: $28 (40)        ; quality to apply to sound
  754. filter                     ds.l    1                ; offset: $2C (44)        ; filter to apply to sound
  755. moreRtn                     ds.l    1                ; offset: $30 (48)        ; routine to call to get more data
  756. completionRtn             ds.l    1                ; offset: $34 (52)        ; routine to call when buffer is complete
  757. refCon                     ds.l    1                ; offset: $38 (56)        ; user refcon
  758. result                     ds.w    1                ; offset: $3C (60)        ; result
  759. sizeof                     EQU *                    ; size:   $3E (62)
  760.                         ENDR
  761. CompressionInfo            RECORD 0
  762. recordSize                 ds.l    1                ; offset: $0 (0)
  763. format                     ds.l    1                ; offset: $4 (4)
  764. compressionID             ds.w    1                ; offset: $8 (8)
  765. samplesPerPacket         ds.w    1                ; offset: $A (10)
  766. bytesPerPacket             ds.w    1                ; offset: $C (12)
  767. bytesPerFrame             ds.w    1                ; offset: $E (14)
  768. bytesPerSample             ds.w    1                ; offset: $10 (16)
  769. futureUse1                 ds.w    1                ; offset: $12 (18)
  770. sizeof                     EQU *                    ; size:   $14 (20)
  771.                         ENDR
  772. ; typedef struct CompressionInfo *        CompressionInfoPtr
  773.  
  774. ; typedef CompressionInfoPtr *            CompressionInfoHandle
  775.  
  776. ; variables for floating point conversion
  777. SoundSlopeAndInterceptRecord RECORD 0
  778. slope                     ds        Float64            ; offset: $0 (0)
  779. intercept                 ds        Float64            ; offset: $8 (8)
  780. minClip                     ds        Float64            ; offset: $10 (16)
  781. maxClip                     ds        Float64            ; offset: $18 (24)
  782. sizeof                     EQU *                    ; size:   $20 (32)
  783.                         ENDR
  784. ; typedef struct SoundSlopeAndInterceptRecord * SoundSlopeAndInterceptPtr
  785.  
  786. ; private thing to use as a reference to a Sound Converter
  787.  
  788.  
  789. ; private thing to use as a reference to a Sound Source
  790.  
  791.  
  792. ; typedef SoundSource *                    SoundSourcePtr
  793.  
  794. SoundComponentLink        RECORD 0
  795. description                 ds        ComponentDescription ; offset: $0 (0)    ; Describes the sound component
  796. mixerID                     ds.l    1                ; offset: $14 (20)        ; Reserved by Apple
  797. linkID                     ds.l    1                ; offset: $18 (24)        ; Reserved by Apple
  798. sizeof                     EQU *                    ; size:   $1C (28)
  799.                         ENDR
  800. ; typedef struct SoundComponentLink *    SoundComponentLinkPtr
  801.  
  802. AudioInfo                RECORD 0
  803. capabilitiesFlags         ds.l    1                ; offset: $0 (0)        ; Describes device capabilities
  804. reserved                 ds.l    1                ; offset: $4 (4)        ; Reserved by Apple
  805. numVolumeSteps             ds.w    1                ; offset: $8 (8)        ; Number of significant increments between min and max volume
  806. sizeof                     EQU *                    ; size:   $A (10)
  807.                         ENDR
  808. ; typedef struct AudioInfo *            AudioInfoPtr
  809.  
  810. AudioFormatAtom            RECORD 0
  811. size                     ds.l    1                ; offset: $0 (0)        ;  = sizeof(AudioFormatAtom)
  812. atomType                 ds.l    1                ; offset: $4 (4)        ;  = kAudioFormatAtomType
  813. format                     ds.l    1                ; offset: $8 (8)
  814. sizeof                     EQU *                    ; size:   $C (12)
  815.                         ENDR
  816. ; typedef struct AudioFormatAtom *        AudioFormatAtomPtr
  817.  
  818. AudioEndianAtom            RECORD 0
  819. size                     ds.l    1                ; offset: $0 (0)        ;  = sizeof(AudioEndianAtom)
  820. atomType                 ds.l    1                ; offset: $4 (4)        ;  = kAudioEndianAtomType
  821. littleEndian             ds.w    1                ; offset: $8 (8)
  822. sizeof                     EQU *                    ; size:   $A (10)
  823.                         ENDR
  824. ; typedef struct AudioEndianAtom *        AudioEndianAtomPtr
  825.  
  826. AudioTerminatorAtom        RECORD 0
  827. size                     ds.l    1                ; offset: $0 (0)        ;  = sizeof(AudioTerminatorAtom)
  828. atomType                 ds.l    1                ; offset: $4 (4)        ;  = kAudioTerminatorAtomType
  829. sizeof                     EQU *                    ; size:   $8 (8)
  830.                         ENDR
  831. ; typedef struct AudioTerminatorAtom *    AudioTerminatorAtomPtr
  832.  
  833. ;  Sound Input Structures
  834.  
  835.  
  836. ; typedef SPB *                            SPBPtr
  837.  
  838. ; user procedures called by sound input routines
  839. ; Sound Input Parameter Block
  840. SPB                        RECORD 0
  841. inRefNum                 ds.l    1                ; offset: $0 (0)        ; reference number of sound input device
  842. count                     ds.l    1                ; offset: $4 (4)        ; number of bytes to record
  843. milliseconds             ds.l    1                ; offset: $8 (8)        ; number of milliseconds to record
  844. bufferLength             ds.l    1                ; offset: $C (12)        ; length of buffer in bytes
  845. bufferPtr                 ds.l    1                ; offset: $10 (16)        ; buffer to store sound data in
  846. completionRoutine         ds.l    1                ; offset: $14 (20)        ; completion routine
  847. interruptRoutine         ds.l    1                ; offset: $18 (24)        ; interrupt routine
  848. userLong                 ds.l    1                ; offset: $1C (28)        ; user-defined field
  849. error                     ds.w    1                ; offset: $20 (32)        ; error
  850. unused1                     ds.l    1                ; offset: $22 (34)        ; reserved - must be zero
  851. sizeof                     EQU *                    ; size:   $26 (38)
  852.                         ENDR
  853.  
  854. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  855. ;   prototypes
  856. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  857.  
  858.  
  859.  
  860.  
  861. ;   These two routines for Get/SetSoundVol should no longer be used.
  862. ;   They were for old Apple Sound Chip machines, and do not support the DSP or PowerMacs.
  863. ;   Use Get/SetDefaultOutputVolume instead, if you must change the user's machine.
  864.  
  865.  
  866.  
  867.     IF OLDROUTINENAMES ** TARGET_CPU_68K THEN
  868. ;
  869. ; pascal void SetSoundVol(short level)
  870. ;
  871.     IF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  872.         IMPORT_CFM_FUNCTION SetSoundVol
  873.     ENDIF
  874.  
  875.  
  876. ;
  877. ; pascal void GetSoundVol(short *level)
  878. ;
  879.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  880.         ; parameters:
  881.         ;    level           => A0
  882.         Macro
  883.         _GetSoundVol
  884.             clr.b               (A0)+
  885.             move.b              $0260,(A0)
  886.         EndM
  887.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  888.         IMPORT_CFM_FUNCTION GetSoundVol
  889.     ENDIF
  890.  
  891.     ENDIF
  892. ;  Sound Manager routines 
  893. ;
  894. ; pascal void SysBeep(short duration)
  895. ;
  896.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  897.         _SysBeep:    OPWORD    $A9C8
  898.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  899.         IMPORT_CFM_FUNCTION SysBeep
  900.     ENDIF
  901.  
  902. ;
  903. ; pascal OSErr SndDoCommand(SndChannelPtr chan, const SndCommand *cmd, Boolean noWait)
  904. ;
  905.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  906.         _SndDoCommand:    OPWORD    $A803
  907.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  908.         IMPORT_CFM_FUNCTION SndDoCommand
  909.     ENDIF
  910.  
  911. ;
  912. ; pascal OSErr SndDoImmediate(SndChannelPtr chan, const SndCommand *cmd)
  913. ;
  914.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  915.         _SndDoImmediate:    OPWORD    $A804
  916.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  917.         IMPORT_CFM_FUNCTION SndDoImmediate
  918.     ENDIF
  919.  
  920. ;
  921. ; pascal OSErr SndNewChannel(SndChannelPtr *chan, short synth, long init, SndCallBackUPP userRoutine)
  922. ;
  923.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  924.         _SndNewChannel:    OPWORD    $A807
  925.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  926.         IMPORT_CFM_FUNCTION SndNewChannel
  927.     ENDIF
  928.  
  929. ;
  930. ; pascal OSErr SndDisposeChannel(SndChannelPtr chan, Boolean quietNow)
  931. ;
  932.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  933.         _SndDisposeChannel:    OPWORD    $A801
  934.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  935.         IMPORT_CFM_FUNCTION SndDisposeChannel
  936.     ENDIF
  937.  
  938. ;
  939. ; pascal OSErr SndPlay(SndChannelPtr chan, SndListHandle sndHandle, Boolean async)
  940. ;
  941.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  942.         _SndPlay:    OPWORD    $A805
  943.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  944.         IMPORT_CFM_FUNCTION SndPlay
  945.     ENDIF
  946.  
  947.     IF OLDROUTINENAMES THEN
  948. ;
  949. ; pascal OSErr SndAddModifier(SndChannelPtr chan, Ptr modifier, short id, long init)
  950. ;
  951.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  952.         _SndAddModifier:    OPWORD    $A802
  953.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  954.         IMPORT_CFM_FUNCTION SndAddModifier
  955.     ENDIF
  956.  
  957.     ENDIF    ; OLDROUTINENAMES
  958. ;
  959. ; pascal OSErr SndControl(short id, SndCommand *cmd)
  960. ;
  961.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  962.         _SndControl:    OPWORD    $A806
  963.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  964.         IMPORT_CFM_FUNCTION SndControl
  965.     ENDIF
  966.  
  967. ;  Sound Manager 2.0 and later, uses _SoundDispatch 
  968. ;
  969. ; pascal NumVersion SndSoundManagerVersion(void )
  970. ;
  971.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  972.         Macro
  973.         _SndSoundManagerVersion
  974.             move.l              #$000C0008,D0
  975.             dc.w                $A800
  976.         EndM
  977.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  978.         IMPORT_CFM_FUNCTION SndSoundManagerVersion
  979.     ENDIF
  980.  
  981. ;
  982. ; pascal OSErr SndStartFilePlay(SndChannelPtr chan, short fRefNum, short resNum, long bufferSize, void *theBuffer, AudioSelectionPtr theSelection, FilePlayCompletionUPP theCompletion, Boolean async)
  983. ;
  984.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  985.         Macro
  986.         _SndStartFilePlay
  987.             move.l              #$0D000008,D0
  988.             dc.w                $A800
  989.         EndM
  990.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  991.         IMPORT_CFM_FUNCTION SndStartFilePlay
  992.     ENDIF
  993.  
  994. ;
  995. ; pascal OSErr SndPauseFilePlay(SndChannelPtr chan)
  996. ;
  997.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  998.         Macro
  999.         _SndPauseFilePlay
  1000.             move.l              #$02040008,D0
  1001.             dc.w                $A800
  1002.         EndM
  1003.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1004.         IMPORT_CFM_FUNCTION SndPauseFilePlay
  1005.     ENDIF
  1006.  
  1007. ;
  1008. ; pascal OSErr SndStopFilePlay(SndChannelPtr chan, Boolean quietNow)
  1009. ;
  1010.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1011.         Macro
  1012.         _SndStopFilePlay
  1013.             move.l              #$03080008,D0
  1014.             dc.w                $A800
  1015.         EndM
  1016.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1017.         IMPORT_CFM_FUNCTION SndStopFilePlay
  1018.     ENDIF
  1019.  
  1020. ;
  1021. ; pascal OSErr SndChannelStatus(SndChannelPtr chan, short theLength, SCStatusPtr theStatus)
  1022. ;
  1023.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1024.         Macro
  1025.         _SndChannelStatus
  1026.             move.l              #$05100008,D0
  1027.             dc.w                $A800
  1028.         EndM
  1029.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1030.         IMPORT_CFM_FUNCTION SndChannelStatus
  1031.     ENDIF
  1032.  
  1033. ;
  1034. ; pascal OSErr SndManagerStatus(short theLength, SMStatusPtr theStatus)
  1035. ;
  1036.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1037.         Macro
  1038.         _SndManagerStatus
  1039.             move.l              #$03140008,D0
  1040.             dc.w                $A800
  1041.         EndM
  1042.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1043.         IMPORT_CFM_FUNCTION SndManagerStatus
  1044.     ENDIF
  1045.  
  1046. ;
  1047. ; pascal void SndGetSysBeepState(short *sysBeepState)
  1048. ;
  1049.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1050.         Macro
  1051.         _SndGetSysBeepState
  1052.             move.l              #$02180008,D0
  1053.             dc.w                $A800
  1054.         EndM
  1055.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1056.         IMPORT_CFM_FUNCTION SndGetSysBeepState
  1057.     ENDIF
  1058.  
  1059. ;
  1060. ; pascal OSErr SndSetSysBeepState(short sysBeepState)
  1061. ;
  1062.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1063.         Macro
  1064.         _SndSetSysBeepState
  1065.             move.l              #$011C0008,D0
  1066.             dc.w                $A800
  1067.         EndM
  1068.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1069.         IMPORT_CFM_FUNCTION SndSetSysBeepState
  1070.     ENDIF
  1071.  
  1072. ;
  1073. ; pascal OSErr SndPlayDoubleBuffer(SndChannelPtr chan, SndDoubleBufferHeaderPtr theParams)
  1074. ;
  1075.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1076.         Macro
  1077.         _SndPlayDoubleBuffer
  1078.             move.l              #$04200008,D0
  1079.             dc.w                $A800
  1080.         EndM
  1081.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1082.         IMPORT_CFM_FUNCTION SndPlayDoubleBuffer
  1083.     ENDIF
  1084.  
  1085. ;  MACE compression routines, uses _SoundDispatch 
  1086. ;
  1087. ; pascal NumVersion MACEVersion(void )
  1088. ;
  1089.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1090.         Macro
  1091.         _MACEVersion
  1092.             move.l              #$00000010,D0
  1093.             dc.w                $A800
  1094.         EndM
  1095.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1096.         IMPORT_CFM_FUNCTION MACEVersion
  1097.     ENDIF
  1098.  
  1099. ;
  1100. ; pascal void Comp3to1(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1101. ;
  1102.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1103.         Macro
  1104.         _Comp3to1
  1105.             move.l              #$00040010,D0
  1106.             dc.w                $A800
  1107.         EndM
  1108.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1109.         IMPORT_CFM_FUNCTION Comp3to1
  1110.     ENDIF
  1111.  
  1112. ;
  1113. ; pascal void Exp1to3(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1114. ;
  1115.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1116.         Macro
  1117.         _Exp1to3
  1118.             move.l              #$00080010,D0
  1119.             dc.w                $A800
  1120.         EndM
  1121.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1122.         IMPORT_CFM_FUNCTION Exp1to3
  1123.     ENDIF
  1124.  
  1125. ;
  1126. ; pascal void Comp6to1(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1127. ;
  1128.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1129.         Macro
  1130.         _Comp6to1
  1131.             move.l              #$000C0010,D0
  1132.             dc.w                $A800
  1133.         EndM
  1134.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1135.         IMPORT_CFM_FUNCTION Comp6to1
  1136.     ENDIF
  1137.  
  1138. ;
  1139. ; pascal void Exp1to6(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1140. ;
  1141.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1142.         Macro
  1143.         _Exp1to6
  1144.             move.l              #$00100010,D0
  1145.             dc.w                $A800
  1146.         EndM
  1147.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1148.         IMPORT_CFM_FUNCTION Exp1to6
  1149.     ENDIF
  1150.  
  1151. ;  Sound Manager 3.0 and later calls, uses _SoundDispatch 
  1152. ;
  1153. ; pascal OSErr GetSysBeepVolume(long *level)
  1154. ;
  1155.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1156.         Macro
  1157.         _GetSysBeepVolume
  1158.             move.l              #$02240018,D0
  1159.             dc.w                $A800
  1160.         EndM
  1161.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1162.         IMPORT_CFM_FUNCTION GetSysBeepVolume
  1163.     ENDIF
  1164.  
  1165. ;
  1166. ; pascal OSErr SetSysBeepVolume(long level)
  1167. ;
  1168.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1169.         Macro
  1170.         _SetSysBeepVolume
  1171.             move.l              #$02280018,D0
  1172.             dc.w                $A800
  1173.         EndM
  1174.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1175.         IMPORT_CFM_FUNCTION SetSysBeepVolume
  1176.     ENDIF
  1177.  
  1178. ;
  1179. ; pascal OSErr GetDefaultOutputVolume(long *level)
  1180. ;
  1181.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1182.         Macro
  1183.         _GetDefaultOutputVolume
  1184.             move.l              #$022C0018,D0
  1185.             dc.w                $A800
  1186.         EndM
  1187.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1188.         IMPORT_CFM_FUNCTION GetDefaultOutputVolume
  1189.     ENDIF
  1190.  
  1191. ;
  1192. ; pascal OSErr SetDefaultOutputVolume(long level)
  1193. ;
  1194.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1195.         Macro
  1196.         _SetDefaultOutputVolume
  1197.             move.l              #$02300018,D0
  1198.             dc.w                $A800
  1199.         EndM
  1200.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1201.         IMPORT_CFM_FUNCTION SetDefaultOutputVolume
  1202.     ENDIF
  1203.  
  1204. ;
  1205. ; pascal OSErr GetSoundHeaderOffset(SndListHandle sndHandle, long *offset)
  1206. ;
  1207.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1208.         Macro
  1209.         _GetSoundHeaderOffset
  1210.             move.l              #$04040018,D0
  1211.             dc.w                $A800
  1212.         EndM
  1213.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1214.         IMPORT_CFM_FUNCTION GetSoundHeaderOffset
  1215.     ENDIF
  1216.  
  1217. ;
  1218. ; pascal UnsignedFixed UnsignedFixedMulDiv(UnsignedFixed value, UnsignedFixed multiplier, UnsignedFixed divisor)
  1219. ;
  1220.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1221.         Macro
  1222.         _UnsignedFixedMulDiv
  1223.             move.l              #$060C0018,D0
  1224.             dc.w                $A800
  1225.         EndM
  1226.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1227.         IMPORT_CFM_FUNCTION UnsignedFixedMulDiv
  1228.     ENDIF
  1229.  
  1230. ;
  1231. ; pascal OSErr GetCompressionInfo(short compressionID, OSType format, short numChannels, short sampleSize, CompressionInfoPtr cp)
  1232. ;
  1233.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1234.         Macro
  1235.         _GetCompressionInfo
  1236.             move.l              #$07100018,D0
  1237.             dc.w                $A800
  1238.         EndM
  1239.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1240.         IMPORT_CFM_FUNCTION GetCompressionInfo
  1241.     ENDIF
  1242.  
  1243. ;
  1244. ; pascal OSErr SetSoundPreference(OSType theType, Str255 name, Handle settings)
  1245. ;
  1246.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1247.         Macro
  1248.         _SetSoundPreference
  1249.             move.l              #$06340018,D0
  1250.             dc.w                $A800
  1251.         EndM
  1252.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1253.         IMPORT_CFM_FUNCTION SetSoundPreference
  1254.     ENDIF
  1255.  
  1256. ;
  1257. ; pascal OSErr GetSoundPreference(OSType theType, Str255 name, Handle settings)
  1258. ;
  1259.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1260.         Macro
  1261.         _GetSoundPreference
  1262.             move.l              #$06380018,D0
  1263.             dc.w                $A800
  1264.         EndM
  1265.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1266.         IMPORT_CFM_FUNCTION GetSoundPreference
  1267.     ENDIF
  1268.  
  1269. ;
  1270. ; pascal OSErr OpenMixerSoundComponent(SoundComponentDataPtr outputDescription, long outputFlags, ComponentInstance *mixerComponent)
  1271. ;
  1272.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1273.         Macro
  1274.         _OpenMixerSoundComponent
  1275.             move.l              #$06140018,D0
  1276.             dc.w                $A800
  1277.         EndM
  1278.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1279.         IMPORT_CFM_FUNCTION OpenMixerSoundComponent
  1280.     ENDIF
  1281.  
  1282. ;
  1283. ; pascal OSErr CloseMixerSoundComponent(ComponentInstance ci)
  1284. ;
  1285.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1286.         Macro
  1287.         _CloseMixerSoundComponent
  1288.             move.l              #$02180018,D0
  1289.             dc.w                $A800
  1290.         EndM
  1291.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1292.         IMPORT_CFM_FUNCTION CloseMixerSoundComponent
  1293.     ENDIF
  1294.  
  1295. ;  Sound Manager 3.1 and later calls, uses _SoundDispatch 
  1296. ;
  1297. ; pascal OSErr SndGetInfo(SndChannelPtr chan, OSType selector, void *infoPtr)
  1298. ;
  1299.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1300.         Macro
  1301.         _SndGetInfo
  1302.             move.l              #$063C0018,D0
  1303.             dc.w                $A800
  1304.         EndM
  1305.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1306.         IMPORT_CFM_FUNCTION SndGetInfo
  1307.     ENDIF
  1308.  
  1309. ;
  1310. ; pascal OSErr SndSetInfo(SndChannelPtr chan, OSType selector, const void *infoPtr)
  1311. ;
  1312.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1313.         Macro
  1314.         _SndSetInfo
  1315.             move.l              #$06400018,D0
  1316.             dc.w                $A800
  1317.         EndM
  1318.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1319.         IMPORT_CFM_FUNCTION SndSetInfo
  1320.     ENDIF
  1321.  
  1322. ;
  1323. ; pascal OSErr GetSoundOutputInfo(Component outputDevice, OSType selector, void *infoPtr)
  1324. ;
  1325.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1326.         Macro
  1327.         _GetSoundOutputInfo
  1328.             move.l              #$06440018,D0
  1329.             dc.w                $A800
  1330.         EndM
  1331.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1332.         IMPORT_CFM_FUNCTION GetSoundOutputInfo
  1333.     ENDIF
  1334.  
  1335. ;
  1336. ; pascal OSErr SetSoundOutputInfo(Component outputDevice, OSType selector, const void *infoPtr)
  1337. ;
  1338.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1339.         Macro
  1340.         _SetSoundOutputInfo
  1341.             move.l              #$06480018,D0
  1342.             dc.w                $A800
  1343.         EndM
  1344.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1345.         IMPORT_CFM_FUNCTION SetSoundOutputInfo
  1346.     ENDIF
  1347.  
  1348. ;  Sound Manager 3.2 and later calls, uses _SoundDispatch 
  1349. ;
  1350. ; pascal OSErr GetCompressionName(OSType compressionType, Str255 compressionName)
  1351. ;
  1352.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1353.         Macro
  1354.         _GetCompressionName
  1355.             move.l              #$044C0018,D0
  1356.             dc.w                $A800
  1357.         EndM
  1358.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1359.         IMPORT_CFM_FUNCTION GetCompressionName
  1360.     ENDIF
  1361.  
  1362. ;
  1363. ; pascal OSErr SoundConverterOpen(const SoundComponentData *inputFormat, const SoundComponentData *outputFormat, SoundConverter *sc)
  1364. ;
  1365.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1366.         Macro
  1367.         _SoundConverterOpen
  1368.             move.l              #$06500018,D0
  1369.             dc.w                $A800
  1370.         EndM
  1371.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1372.         IMPORT_CFM_FUNCTION SoundConverterOpen
  1373.     ENDIF
  1374.  
  1375. ;
  1376. ; pascal OSErr SoundConverterClose(SoundConverter sc)
  1377. ;
  1378.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1379.         Macro
  1380.         _SoundConverterClose
  1381.             move.l              #$02540018,D0
  1382.             dc.w                $A800
  1383.         EndM
  1384.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1385.         IMPORT_CFM_FUNCTION SoundConverterClose
  1386.     ENDIF
  1387.  
  1388. ;
  1389. ; pascal OSErr SoundConverterGetBufferSizes(SoundConverter sc, unsigned long inputBytesTarget, unsigned long *inputFrames, unsigned long *inputBytes, unsigned long *outputBytes)
  1390. ;
  1391.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1392.         Macro
  1393.         _SoundConverterGetBufferSizes
  1394.             move.l              #$0A580018,D0
  1395.             dc.w                $A800
  1396.         EndM
  1397.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1398.         IMPORT_CFM_FUNCTION SoundConverterGetBufferSizes
  1399.     ENDIF
  1400.  
  1401. ;
  1402. ; pascal OSErr SoundConverterBeginConversion(SoundConverter sc)
  1403. ;
  1404.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1405.         Macro
  1406.         _SoundConverterBeginConversion
  1407.             move.l              #$025C0018,D0
  1408.             dc.w                $A800
  1409.         EndM
  1410.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1411.         IMPORT_CFM_FUNCTION SoundConverterBeginConversion
  1412.     ENDIF
  1413.  
  1414. ;
  1415. ; pascal OSErr SoundConverterConvertBuffer(SoundConverter sc, const void *inputPtr, unsigned long inputFrames, void *outputPtr, unsigned long *outputFrames, unsigned long *outputBytes)
  1416. ;
  1417.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1418.         Macro
  1419.         _SoundConverterConvertBuffer
  1420.             move.l              #$0C600018,D0
  1421.             dc.w                $A800
  1422.         EndM
  1423.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1424.         IMPORT_CFM_FUNCTION SoundConverterConvertBuffer
  1425.     ENDIF
  1426.  
  1427. ;
  1428. ; pascal OSErr SoundConverterEndConversion(SoundConverter sc, void *outputPtr, unsigned long *outputFrames, unsigned long *outputBytes)
  1429. ;
  1430.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1431.         Macro
  1432.         _SoundConverterEndConversion
  1433.             move.l              #$08640018,D0
  1434.             dc.w                $A800
  1435.         EndM
  1436.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1437.         IMPORT_CFM_FUNCTION SoundConverterEndConversion
  1438.     ENDIF
  1439.  
  1440. ;  Sound Manager 3.3 and later calls, uses _SoundDispatch 
  1441. ;
  1442. ; pascal OSErr SoundConverterGetInfo(SoundConverter sc, OSType selector, void *infoPtr)
  1443. ;
  1444.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1445.         Macro
  1446.         _SoundConverterGetInfo
  1447.             move.l              #$06680018,D0
  1448.             dc.w                $A800
  1449.         EndM
  1450.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1451.         IMPORT_CFM_FUNCTION SoundConverterGetInfo
  1452.     ENDIF
  1453.  
  1454. ;
  1455. ; pascal OSErr SoundConverterSetInfo(SoundConverter sc, OSType selector, void *infoPtr)
  1456. ;
  1457.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1458.         Macro
  1459.         _SoundConverterSetInfo
  1460.             move.l              #$066C0018,D0
  1461.             dc.w                $A800
  1462.         EndM
  1463.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1464.         IMPORT_CFM_FUNCTION SoundConverterSetInfo
  1465.     ENDIF
  1466.  
  1467.  
  1468. ;  Sound Component Functions
  1469. ;   basic sound component functions
  1470.  
  1471.  
  1472.  
  1473. ;
  1474. ; pascal ComponentResult SoundComponentInitOutputDevice(ComponentInstance ti, long actions)
  1475. ;
  1476.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1477.         Macro
  1478.         _SoundComponentInitOutputDevice
  1479.             move.l              #$00040001,-(sp)
  1480.             moveq               #0,D0
  1481.             dc.w                $A82A
  1482.         EndM
  1483.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1484.         IMPORT_CFM_FUNCTION SoundComponentInitOutputDevice
  1485.     ENDIF
  1486.  
  1487. ;
  1488. ; pascal ComponentResult SoundComponentSetSource(ComponentInstance ti, SoundSource sourceID, ComponentInstance source)
  1489. ;
  1490.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1491.         Macro
  1492.         _SoundComponentSetSource
  1493.             move.l              #$00080002,-(sp)
  1494.             moveq               #0,D0
  1495.             dc.w                $A82A
  1496.         EndM
  1497.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1498.         IMPORT_CFM_FUNCTION SoundComponentSetSource
  1499.     ENDIF
  1500.  
  1501. ;
  1502. ; pascal ComponentResult SoundComponentGetSource(ComponentInstance ti, SoundSource sourceID, ComponentInstance *source)
  1503. ;
  1504.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1505.         Macro
  1506.         _SoundComponentGetSource
  1507.             move.l              #$00080003,-(sp)
  1508.             moveq               #0,D0
  1509.             dc.w                $A82A
  1510.         EndM
  1511.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1512.         IMPORT_CFM_FUNCTION SoundComponentGetSource
  1513.     ENDIF
  1514.  
  1515. ;
  1516. ; pascal ComponentResult SoundComponentGetSourceData(ComponentInstance ti, SoundComponentDataPtr *sourceData)
  1517. ;
  1518.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1519.         Macro
  1520.         _SoundComponentGetSourceData
  1521.             move.l              #$00040004,-(sp)
  1522.             moveq               #0,D0
  1523.             dc.w                $A82A
  1524.         EndM
  1525.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1526.         IMPORT_CFM_FUNCTION SoundComponentGetSourceData
  1527.     ENDIF
  1528.  
  1529. ;
  1530. ; pascal ComponentResult SoundComponentSetOutput(ComponentInstance ti, SoundComponentDataPtr requested, SoundComponentDataPtr *actual)
  1531. ;
  1532.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1533.         Macro
  1534.         _SoundComponentSetOutput
  1535.             move.l              #$00080005,-(sp)
  1536.             moveq               #0,D0
  1537.             dc.w                $A82A
  1538.         EndM
  1539.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1540.         IMPORT_CFM_FUNCTION SoundComponentSetOutput
  1541.     ENDIF
  1542.  
  1543. ;  junction methods for the mixer, must be called at non-interrupt level
  1544. ;
  1545. ; pascal ComponentResult SoundComponentAddSource(ComponentInstance ti, SoundSource *sourceID)
  1546. ;
  1547.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1548.         Macro
  1549.         _SoundComponentAddSource
  1550.             move.l              #$00040101,-(sp)
  1551.             moveq               #0,D0
  1552.             dc.w                $A82A
  1553.         EndM
  1554.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1555.         IMPORT_CFM_FUNCTION SoundComponentAddSource
  1556.     ENDIF
  1557.  
  1558. ;
  1559. ; pascal ComponentResult SoundComponentRemoveSource(ComponentInstance ti, SoundSource sourceID)
  1560. ;
  1561.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1562.         Macro
  1563.         _SoundComponentRemoveSource
  1564.             move.l              #$00040102,-(sp)
  1565.             moveq               #0,D0
  1566.             dc.w                $A82A
  1567.         EndM
  1568.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1569.         IMPORT_CFM_FUNCTION SoundComponentRemoveSource
  1570.     ENDIF
  1571.  
  1572. ;  info methods
  1573. ;
  1574. ; pascal ComponentResult SoundComponentGetInfo(ComponentInstance ti, SoundSource sourceID, OSType selector, void *infoPtr)
  1575. ;
  1576.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1577.         Macro
  1578.         _SoundComponentGetInfo
  1579.             move.l              #$000C0103,-(sp)
  1580.             moveq               #0,D0
  1581.             dc.w                $A82A
  1582.         EndM
  1583.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1584.         IMPORT_CFM_FUNCTION SoundComponentGetInfo
  1585.     ENDIF
  1586.  
  1587. ;
  1588. ; pascal ComponentResult SoundComponentSetInfo(ComponentInstance ti, SoundSource sourceID, OSType selector, void *infoPtr)
  1589. ;
  1590.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1591.         Macro
  1592.         _SoundComponentSetInfo
  1593.             move.l              #$000C0104,-(sp)
  1594.             moveq               #0,D0
  1595.             dc.w                $A82A
  1596.         EndM
  1597.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1598.         IMPORT_CFM_FUNCTION SoundComponentSetInfo
  1599.     ENDIF
  1600.  
  1601. ;  control methods
  1602. ;
  1603. ; pascal ComponentResult SoundComponentStartSource(ComponentInstance ti, short count, SoundSource *sources)
  1604. ;
  1605.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1606.         Macro
  1607.         _SoundComponentStartSource
  1608.             move.l              #$00060105,-(sp)
  1609.             moveq               #0,D0
  1610.             dc.w                $A82A
  1611.         EndM
  1612.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1613.         IMPORT_CFM_FUNCTION SoundComponentStartSource
  1614.     ENDIF
  1615.  
  1616. ;
  1617. ; pascal ComponentResult SoundComponentStopSource(ComponentInstance ti, short count, SoundSource *sources)
  1618. ;
  1619.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1620.         Macro
  1621.         _SoundComponentStopSource
  1622.             move.l              #$00060106,-(sp)
  1623.             moveq               #0,D0
  1624.             dc.w                $A82A
  1625.         EndM
  1626.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1627.         IMPORT_CFM_FUNCTION SoundComponentStopSource
  1628.     ENDIF
  1629.  
  1630. ;
  1631. ; pascal ComponentResult SoundComponentPauseSource(ComponentInstance ti, short count, SoundSource *sources)
  1632. ;
  1633.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1634.         Macro
  1635.         _SoundComponentPauseSource
  1636.             move.l              #$00060107,-(sp)
  1637.             moveq               #0,D0
  1638.             dc.w                $A82A
  1639.         EndM
  1640.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1641.         IMPORT_CFM_FUNCTION SoundComponentPauseSource
  1642.     ENDIF
  1643.  
  1644. ;
  1645. ; pascal ComponentResult SoundComponentPlaySourceBuffer(ComponentInstance ti, SoundSource sourceID, SoundParamBlockPtr pb, long actions)
  1646. ;
  1647.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1648.         Macro
  1649.         _SoundComponentPlaySourceBuffer
  1650.             move.l              #$000C0108,-(sp)
  1651.             moveq               #0,D0
  1652.             dc.w                $A82A
  1653.         EndM
  1654.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1655.         IMPORT_CFM_FUNCTION SoundComponentPlaySourceBuffer
  1656.     ENDIF
  1657.  
  1658. ; Audio Components
  1659. ; Volume is described as a value between 0 and 1, with 0 indicating minimum
  1660. ;  volume and 1 indicating maximum volume; if the device doesn't support
  1661. ;  software control of volume, then a value of unimpErr is returned, indicating
  1662. ;  that these functions are not supported by the device
  1663.  
  1664. ;
  1665. ; pascal ComponentResult AudioGetVolume(ComponentInstance ac, short whichChannel, ShortFixed *volume)
  1666. ;
  1667.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1668.         Macro
  1669.         _AudioGetVolume
  1670.             move.l              #$00060000,-(sp)
  1671.             moveq               #0,D0
  1672.             dc.w                $A82A
  1673.         EndM
  1674.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1675.         IMPORT_CFM_FUNCTION AudioGetVolume
  1676.     ENDIF
  1677.  
  1678. ;
  1679. ; pascal ComponentResult AudioSetVolume(ComponentInstance ac, short whichChannel, ShortFixed volume)
  1680. ;
  1681.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1682.         Macro
  1683.         _AudioSetVolume
  1684.             move.l              #$00040001,-(sp)
  1685.             moveq               #0,D0
  1686.             dc.w                $A82A
  1687.         EndM
  1688.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1689.         IMPORT_CFM_FUNCTION AudioSetVolume
  1690.     ENDIF
  1691.  
  1692. ; If the device doesn't support software control of mute, then a value of unimpErr is
  1693. ;returned, indicating that these functions are not supported by the device.
  1694. ;
  1695. ; pascal ComponentResult AudioGetMute(ComponentInstance ac, short whichChannel, short *mute)
  1696. ;
  1697.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1698.         Macro
  1699.         _AudioGetMute
  1700.             move.l              #$00060002,-(sp)
  1701.             moveq               #0,D0
  1702.             dc.w                $A82A
  1703.         EndM
  1704.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1705.         IMPORT_CFM_FUNCTION AudioGetMute
  1706.     ENDIF
  1707.  
  1708. ;
  1709. ; pascal ComponentResult AudioSetMute(ComponentInstance ac, short whichChannel, short mute)
  1710. ;
  1711.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1712.         Macro
  1713.         _AudioSetMute
  1714.             move.l              #$00040003,-(sp)
  1715.             moveq               #0,D0
  1716.             dc.w                $A82A
  1717.         EndM
  1718.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1719.         IMPORT_CFM_FUNCTION AudioSetMute
  1720.     ENDIF
  1721.  
  1722. ; AudioSetToDefaults causes the associated device to reset its volume and mute values
  1723. ;(and perhaps other characteristics, e.g. attenuation) to "factory default" settings
  1724. ;
  1725. ; pascal ComponentResult AudioSetToDefaults(ComponentInstance ac)
  1726. ;
  1727.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1728.         Macro
  1729.         _AudioSetToDefaults
  1730.             move.l              #$00000004,-(sp)
  1731.             moveq               #0,D0
  1732.             dc.w                $A82A
  1733.         EndM
  1734.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1735.         IMPORT_CFM_FUNCTION AudioSetToDefaults
  1736.     ENDIF
  1737.  
  1738. ; This routine is required; it must be implemented by all audio components
  1739.  
  1740. ;
  1741. ; pascal ComponentResult AudioGetInfo(ComponentInstance ac, AudioInfoPtr info)
  1742. ;
  1743.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1744.         Macro
  1745.         _AudioGetInfo
  1746.             move.l              #$00040005,-(sp)
  1747.             moveq               #0,D0
  1748.             dc.w                $A82A
  1749.         EndM
  1750.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1751.         IMPORT_CFM_FUNCTION AudioGetInfo
  1752.     ENDIF
  1753.  
  1754. ;
  1755. ; pascal ComponentResult AudioGetBass(ComponentInstance ac, short whichChannel, short *bass)
  1756. ;
  1757.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1758.         Macro
  1759.         _AudioGetBass
  1760.             move.l              #$00060006,-(sp)
  1761.             moveq               #0,D0
  1762.             dc.w                $A82A
  1763.         EndM
  1764.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1765.         IMPORT_CFM_FUNCTION AudioGetBass
  1766.     ENDIF
  1767.  
  1768. ;
  1769. ; pascal ComponentResult AudioSetBass(ComponentInstance ac, short whichChannel, short bass)
  1770. ;
  1771.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1772.         Macro
  1773.         _AudioSetBass
  1774.             move.l              #$00040007,-(sp)
  1775.             moveq               #0,D0
  1776.             dc.w                $A82A
  1777.         EndM
  1778.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1779.         IMPORT_CFM_FUNCTION AudioSetBass
  1780.     ENDIF
  1781.  
  1782. ;
  1783. ; pascal ComponentResult AudioGetTreble(ComponentInstance ac, short whichChannel, short *Treble)
  1784. ;
  1785.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1786.         Macro
  1787.         _AudioGetTreble
  1788.             move.l              #$00060008,-(sp)
  1789.             moveq               #0,D0
  1790.             dc.w                $A82A
  1791.         EndM
  1792.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1793.         IMPORT_CFM_FUNCTION AudioGetTreble
  1794.     ENDIF
  1795.  
  1796. ;
  1797. ; pascal ComponentResult AudioSetTreble(ComponentInstance ac, short whichChannel, short Treble)
  1798. ;
  1799.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1800.         Macro
  1801.         _AudioSetTreble
  1802.             move.l              #$00040009,-(sp)
  1803.             moveq               #0,D0
  1804.             dc.w                $A82A
  1805.         EndM
  1806.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1807.         IMPORT_CFM_FUNCTION AudioSetTreble
  1808.     ENDIF
  1809.  
  1810. ;
  1811. ; pascal ComponentResult AudioGetOutputDevice(ComponentInstance ac, Component *outputDevice)
  1812. ;
  1813.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1814.         Macro
  1815.         _AudioGetOutputDevice
  1816.             move.l              #$0004000A,-(sp)
  1817.             moveq               #0,D0
  1818.             dc.w                $A82A
  1819.         EndM
  1820.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1821.         IMPORT_CFM_FUNCTION AudioGetOutputDevice
  1822.     ENDIF
  1823.  
  1824.  
  1825. ; This is routine is private to the AudioVision component.  It enables the watching of the mute key.
  1826. ;
  1827. ; pascal ComponentResult AudioMuteOnEvent(ComponentInstance ac, short muteOnEvent)
  1828. ;
  1829.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1830.         Macro
  1831.         _AudioMuteOnEvent
  1832.             move.l              #$00020081,-(sp)
  1833.             moveq               #0,D0
  1834.             dc.w                $A82A
  1835.         EndM
  1836.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1837.         IMPORT_CFM_FUNCTION AudioMuteOnEvent
  1838.     ENDIF
  1839.  
  1840.  
  1841. kDelegatedSoundComponentSelectors EQU    $0100
  1842. ;  Sound Input Manager routines, uses _SoundDispatch 
  1843. ;
  1844. ; pascal NumVersion SPBVersion(void )
  1845. ;
  1846.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1847.         Macro
  1848.         _SPBVersion
  1849.             move.l              #$00000014,D0
  1850.             dc.w                $A800
  1851.         EndM
  1852.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1853.         IMPORT_CFM_FUNCTION SPBVersion
  1854.     ENDIF
  1855.  
  1856. ;
  1857. ; pascal OSErr SndRecord(ModalFilterUPP filterProc, Point corner, OSType quality, SndListHandle *sndHandle)
  1858. ;
  1859.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1860.         Macro
  1861.         _SndRecord
  1862.             move.l              #$08040014,D0
  1863.             dc.w                $A800
  1864.         EndM
  1865.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1866.         IMPORT_CFM_FUNCTION SndRecord
  1867.     ENDIF
  1868.  
  1869. ;
  1870. ; pascal OSErr SndRecordToFile(ModalFilterUPP filterProc, Point corner, OSType quality, short fRefNum)
  1871. ;
  1872.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1873.         Macro
  1874.         _SndRecordToFile
  1875.             move.l              #$07080014,D0
  1876.             dc.w                $A800
  1877.         EndM
  1878.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1879.         IMPORT_CFM_FUNCTION SndRecordToFile
  1880.     ENDIF
  1881.  
  1882. ;
  1883. ; pascal OSErr SPBSignInDevice(short deviceRefNum, ConstStr255Param deviceName)
  1884. ;
  1885.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1886.         Macro
  1887.         _SPBSignInDevice
  1888.             move.l              #$030C0014,D0
  1889.             dc.w                $A800
  1890.         EndM
  1891.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1892.         IMPORT_CFM_FUNCTION SPBSignInDevice
  1893.     ENDIF
  1894.  
  1895. ;
  1896. ; pascal OSErr SPBSignOutDevice(short deviceRefNum)
  1897. ;
  1898.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1899.         Macro
  1900.         _SPBSignOutDevice
  1901.             move.l              #$01100014,D0
  1902.             dc.w                $A800
  1903.         EndM
  1904.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1905.         IMPORT_CFM_FUNCTION SPBSignOutDevice
  1906.     ENDIF
  1907.  
  1908. ;
  1909. ; pascal OSErr SPBGetIndexedDevice(short count, Str255 deviceName, Handle *deviceIconHandle)
  1910. ;
  1911.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1912.         Macro
  1913.         _SPBGetIndexedDevice
  1914.             move.l              #$05140014,D0
  1915.             dc.w                $A800
  1916.         EndM
  1917.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1918.         IMPORT_CFM_FUNCTION SPBGetIndexedDevice
  1919.     ENDIF
  1920.  
  1921. ;
  1922. ; pascal OSErr SPBOpenDevice(ConstStr255Param deviceName, short permission, long *inRefNum)
  1923. ;
  1924.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1925.         Macro
  1926.         _SPBOpenDevice
  1927.             move.l              #$05180014,D0
  1928.             dc.w                $A800
  1929.         EndM
  1930.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1931.         IMPORT_CFM_FUNCTION SPBOpenDevice
  1932.     ENDIF
  1933.  
  1934. ;
  1935. ; pascal OSErr SPBCloseDevice(long inRefNum)
  1936. ;
  1937.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1938.         Macro
  1939.         _SPBCloseDevice
  1940.             move.l              #$021C0014,D0
  1941.             dc.w                $A800
  1942.         EndM
  1943.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1944.         IMPORT_CFM_FUNCTION SPBCloseDevice
  1945.     ENDIF
  1946.  
  1947. ;
  1948. ; pascal OSErr SPBRecord(SPBPtr inParamPtr, Boolean asynchFlag)
  1949. ;
  1950.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1951.         Macro
  1952.         _SPBRecord
  1953.             move.l              #$03200014,D0
  1954.             dc.w                $A800
  1955.         EndM
  1956.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1957.         IMPORT_CFM_FUNCTION SPBRecord
  1958.     ENDIF
  1959.  
  1960. ;
  1961. ; pascal OSErr SPBRecordToFile(short fRefNum, SPBPtr inParamPtr, Boolean asynchFlag)
  1962. ;
  1963.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1964.         Macro
  1965.         _SPBRecordToFile
  1966.             move.l              #$04240014,D0
  1967.             dc.w                $A800
  1968.         EndM
  1969.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1970.         IMPORT_CFM_FUNCTION SPBRecordToFile
  1971.     ENDIF
  1972.  
  1973. ;
  1974. ; pascal OSErr SPBPauseRecording(long inRefNum)
  1975. ;
  1976.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1977.         Macro
  1978.         _SPBPauseRecording
  1979.             move.l              #$02280014,D0
  1980.             dc.w                $A800
  1981.         EndM
  1982.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1983.         IMPORT_CFM_FUNCTION SPBPauseRecording
  1984.     ENDIF
  1985.  
  1986. ;
  1987. ; pascal OSErr SPBResumeRecording(long inRefNum)
  1988. ;
  1989.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1990.         Macro
  1991.         _SPBResumeRecording
  1992.             move.l              #$022C0014,D0
  1993.             dc.w                $A800
  1994.         EndM
  1995.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1996.         IMPORT_CFM_FUNCTION SPBResumeRecording
  1997.     ENDIF
  1998.  
  1999. ;
  2000. ; pascal OSErr SPBStopRecording(long inRefNum)
  2001. ;
  2002.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2003.         Macro
  2004.         _SPBStopRecording
  2005.             move.l              #$02300014,D0
  2006.             dc.w                $A800
  2007.         EndM
  2008.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2009.         IMPORT_CFM_FUNCTION SPBStopRecording
  2010.     ENDIF
  2011.  
  2012. ;
  2013. ; pascal OSErr SPBGetRecordingStatus(long inRefNum, short *recordingStatus, short *meterLevel, unsigned long *totalSamplesToRecord, unsigned long *numberOfSamplesRecorded, unsigned long *totalMsecsToRecord, unsigned long *numberOfMsecsRecorded)
  2014. ;
  2015.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2016.         Macro
  2017.         _SPBGetRecordingStatus
  2018.             move.l              #$0E340014,D0
  2019.             dc.w                $A800
  2020.         EndM
  2021.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2022.         IMPORT_CFM_FUNCTION SPBGetRecordingStatus
  2023.     ENDIF
  2024.  
  2025. ;
  2026. ; pascal OSErr SPBGetDeviceInfo(long inRefNum, OSType infoType, void *infoData)
  2027. ;
  2028.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2029.         Macro
  2030.         _SPBGetDeviceInfo
  2031.             move.l              #$06380014,D0
  2032.             dc.w                $A800
  2033.         EndM
  2034.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2035.         IMPORT_CFM_FUNCTION SPBGetDeviceInfo
  2036.     ENDIF
  2037.  
  2038. ;
  2039. ; pascal OSErr SPBSetDeviceInfo(long inRefNum, OSType infoType, void *infoData)
  2040. ;
  2041.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2042.         Macro
  2043.         _SPBSetDeviceInfo
  2044.             move.l              #$063C0014,D0
  2045.             dc.w                $A800
  2046.         EndM
  2047.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2048.         IMPORT_CFM_FUNCTION SPBSetDeviceInfo
  2049.     ENDIF
  2050.  
  2051. ;
  2052. ; pascal OSErr SPBMillisecondsToBytes(long inRefNum, long *milliseconds)
  2053. ;
  2054.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2055.         Macro
  2056.         _SPBMillisecondsToBytes
  2057.             move.l              #$04400014,D0
  2058.             dc.w                $A800
  2059.         EndM
  2060.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2061.         IMPORT_CFM_FUNCTION SPBMillisecondsToBytes
  2062.     ENDIF
  2063.  
  2064. ;
  2065. ; pascal OSErr SPBBytesToMilliseconds(long inRefNum, long *byteCount)
  2066. ;
  2067.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2068.         Macro
  2069.         _SPBBytesToMilliseconds
  2070.             move.l              #$04440014,D0
  2071.             dc.w                $A800
  2072.         EndM
  2073.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2074.         IMPORT_CFM_FUNCTION SPBBytesToMilliseconds
  2075.     ENDIF
  2076.  
  2077. ;
  2078. ; pascal OSErr SetupSndHeader(SndListHandle sndHandle, short numChannels, UnsignedFixed sampleRate, short sampleSize, OSType compressionType, short baseNote, unsigned long numBytes, short *headerLen)
  2079. ;
  2080.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2081.         Macro
  2082.         _SetupSndHeader
  2083.             move.l              #$0D480014,D0
  2084.             dc.w                $A800
  2085.         EndM
  2086.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2087.         IMPORT_CFM_FUNCTION SetupSndHeader
  2088.     ENDIF
  2089.  
  2090. ;
  2091. ; pascal OSErr SetupAIFFHeader(short fRefNum, short numChannels, UnsignedFixed sampleRate, short sampleSize, OSType compressionType, unsigned long numBytes, unsigned long numFrames)
  2092. ;
  2093.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2094.         Macro
  2095.         _SetupAIFFHeader
  2096.             move.l              #$0B4C0014,D0
  2097.             dc.w                $A800
  2098.         EndM
  2099.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2100.         IMPORT_CFM_FUNCTION SetupAIFFHeader
  2101.     ENDIF
  2102.  
  2103. ;  Sound Input Manager 1.1 and later calls, uses _SoundDispatch 
  2104. ;
  2105. ; pascal OSErr ParseAIFFHeader(short fRefNum, SoundComponentData *sndInfo, unsigned long *numFrames, unsigned long *dataOffset)
  2106. ;
  2107.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2108.         Macro
  2109.         _ParseAIFFHeader
  2110.             move.l              #$07580014,D0
  2111.             dc.w                $A800
  2112.         EndM
  2113.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2114.         IMPORT_CFM_FUNCTION ParseAIFFHeader
  2115.     ENDIF
  2116.  
  2117. ;
  2118. ; pascal OSErr ParseSndHeader(SndListHandle sndHandle, SoundComponentData *sndInfo, unsigned long *numFrames, unsigned long *dataOffset)
  2119. ;
  2120.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2121.         Macro
  2122.         _ParseSndHeader
  2123.             move.l              #$085C0014,D0
  2124.             dc.w                $A800
  2125.         EndM
  2126.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2127.         IMPORT_CFM_FUNCTION ParseSndHeader
  2128.     ENDIF
  2129.  
  2130.     IF ¬ TARGET_OS_MAC THEN
  2131. ;   Only to be used if you are writing a sound input component; this 
  2132. ;   is the param block for a read request from the SoundMgr to the   
  2133. ;   sound input component.  Not to be confused with the SPB struct   
  2134. ;   above, which is the param block for a read request from an app   
  2135. ;   to the SoundMgr.                                                 
  2136.  
  2137.  
  2138. ; typedef SndInputCmpParam *            SndInputCmpParamPtr
  2139.  
  2140. SndInputCmpParam        RECORD 0
  2141. ioCompletion             ds.l    1                ; offset: $0 (0)        ;  completion routine [pointer]
  2142. ioInterrupt                 ds.l    1                ; offset: $4 (4)        ;  interrupt routine [pointer]
  2143. ioResult                 ds.w    1                ; offset: $8 (8)        ;  I/O result code [word]
  2144. pad                         ds.w    1                ; offset: $A (10)
  2145. ioReqCount                 ds.l    1                ; offset: $C (12)
  2146. ioActCount                 ds.l    1                ; offset: $10 (16)
  2147. ioBuffer                 ds.l    1                ; offset: $14 (20)
  2148. ioMisc                     ds.l    1                ; offset: $18 (24)
  2149. sizeof                     EQU *                    ; size:   $1C (28)
  2150.                         ENDR
  2151. ;
  2152. ; pascal ComponentResult SndInputReadAsync(ComponentInstance self, SndInputCmpParamPtr SICParmPtr)
  2153. ;
  2154.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2155.         Macro
  2156.         _SndInputReadAsync
  2157.             move.l              #$00040001,-(sp)
  2158.             moveq               #0,D0
  2159.             dc.w                $A82A
  2160.         EndM
  2161.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2162.         IMPORT_CFM_FUNCTION SndInputReadAsync
  2163.     ENDIF
  2164.  
  2165. ;
  2166. ; pascal ComponentResult SndInputReadSync(ComponentInstance self, SndInputCmpParamPtr SICParmPtr)
  2167. ;
  2168.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2169.         Macro
  2170.         _SndInputReadSync
  2171.             move.l              #$00040002,-(sp)
  2172.             moveq               #0,D0
  2173.             dc.w                $A82A
  2174.         EndM
  2175.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2176.         IMPORT_CFM_FUNCTION SndInputReadSync
  2177.     ENDIF
  2178.  
  2179. ;
  2180. ; pascal ComponentResult SndInputPauseRecording(ComponentInstance self)
  2181. ;
  2182.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2183.         Macro
  2184.         _SndInputPauseRecording
  2185.             move.l              #$00000003,-(sp)
  2186.             moveq               #0,D0
  2187.             dc.w                $A82A
  2188.         EndM
  2189.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2190.         IMPORT_CFM_FUNCTION SndInputPauseRecording
  2191.     ENDIF
  2192.  
  2193. ;
  2194. ; pascal ComponentResult SndInputResumeRecording(ComponentInstance self)
  2195. ;
  2196.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2197.         Macro
  2198.         _SndInputResumeRecording
  2199.             move.l              #$00000004,-(sp)
  2200.             moveq               #0,D0
  2201.             dc.w                $A82A
  2202.         EndM
  2203.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2204.         IMPORT_CFM_FUNCTION SndInputResumeRecording
  2205.     ENDIF
  2206.  
  2207. ;
  2208. ; pascal ComponentResult SndInputStopRecording(ComponentInstance self)
  2209. ;
  2210.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2211.         Macro
  2212.         _SndInputStopRecording
  2213.             move.l              #$00000005,-(sp)
  2214.             moveq               #0,D0
  2215.             dc.w                $A82A
  2216.         EndM
  2217.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2218.         IMPORT_CFM_FUNCTION SndInputStopRecording
  2219.     ENDIF
  2220.  
  2221. ;
  2222. ; pascal ComponentResult SndInputGetStatus(ComponentInstance self, short *recordingStatus, unsigned long *totalSamplesToRecord, unsigned long *numberOfSamplesRecorded)
  2223. ;
  2224.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2225.         Macro
  2226.         _SndInputGetStatus
  2227.             move.l              #$000C0006,-(sp)
  2228.             moveq               #0,D0
  2229.             dc.w                $A82A
  2230.         EndM
  2231.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2232.         IMPORT_CFM_FUNCTION SndInputGetStatus
  2233.     ENDIF
  2234.  
  2235. ;
  2236. ; pascal ComponentResult SndInputGetDeviceInfo(ComponentInstance self, OSType infoType, void *infoData)
  2237. ;
  2238.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2239.         Macro
  2240.         _SndInputGetDeviceInfo
  2241.             move.l              #$00080007,-(sp)
  2242.             moveq               #0,D0
  2243.             dc.w                $A82A
  2244.         EndM
  2245.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2246.         IMPORT_CFM_FUNCTION SndInputGetDeviceInfo
  2247.     ENDIF
  2248.  
  2249. ;
  2250. ; pascal ComponentResult SndInputSetDeviceInfo(ComponentInstance self, OSType infoType, void *infoData)
  2251. ;
  2252.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2253.         Macro
  2254.         _SndInputSetDeviceInfo
  2255.             move.l              #$00080008,-(sp)
  2256.             moveq               #0,D0
  2257.             dc.w                $A82A
  2258.         EndM
  2259.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2260.         IMPORT_CFM_FUNCTION SndInputSetDeviceInfo
  2261.     ENDIF
  2262.  
  2263. ;
  2264. ; pascal ComponentResult SndInputInitHardware(ComponentInstance self)
  2265. ;
  2266.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2267.         Macro
  2268.         _SndInputInitHardware
  2269.             move.l              #$00000009,-(sp)
  2270.             moveq               #0,D0
  2271.             dc.w                $A82A
  2272.         EndM
  2273.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2274.         IMPORT_CFM_FUNCTION SndInputInitHardware
  2275.     ENDIF
  2276.  
  2277.     ENDIF
  2278.  
  2279.     ENDIF ; __SOUND__ 
  2280.  
  2281.